msgbox

Inside a userform, I have a frame and a textbox. Inside the frame I have six option buttons. When the form initializes none of the option buttons are selected but as soon as the user selects any of the option buttons I need it to tab to the next control (textbox1). Is there not an easier way to...

I would like a macro in which a MsgBox selection would open a pdf form in acrobat. Such as ack yes/No, selecting yes would open would then open document as well as another function I already have operating. Any help would be greatly appreciated.

I use the macro below to sort a Pivot table descending based on the value cell I have selected in Pivot Table value section, regardless of how many Row Labels there are. It works for a standard Pivot Table, but not one that has been added to the Data Model. Any ideas as to what needs to be...

Afternoon, I have in use the following code which transfers data from my userform to my worksheet. Before i see the message "Customer Postage Sheet Updated" i am looking for a Yes / No Msgbox. Where if No is selected then continue to show the "Customer Postage Sheet Updated" as normal BUT If...

I am trying to use a variable to determine how many times to go thru a loop. The code that I am trying to get to work is shown below. If I use 'For S1 = 1 to 2", I go inside my loop 2 times. If I use 'For S1 = 1 to NumofTimes', I do not get inside my loop. The Msgboxes show a value of 1 and a...

My co-workers computer turned off due to a power outage and lost his file he was working on for hours and didn’t save. Is there an application code that can do create an if statement like If Application has been open for 20 minutes, msgbox “Save!!”

Hi Everyone, I have quick question :) How can i add MsgBox if there is no "fail" current week ? Is it possible to help me to finish this macro ? Thank you Sub GetFilterForFails() ' ' GetFilterForFails Macro ' ' Dim CurrentYear As Integer Dim previousweek As Integer Dim slaUK As...

I'm trying to create a form where, if certain fields are blank, it prevents the user from printing I got most of the code to work, but I can't manage to figure out how to check whether an option button has been selected. A lot of resources I've found say to use something along the lines of If...

Hi, need help. I have a command button to paste the data to sheet 2 but it's just overwriting the data to row 2. Codes as follows: Sub Add_Entry() Dim historyWks As Worksheet Dim inputWks As Worksheet Dim Derick As Worksheet Dim nextRow As Long Dim oCol As Long...

Hi, Looking for VBA to save all sheets to PDF. Currently i have the below, but only saves the active sheet. Thanks. Private Sub CommandButton8_Click() Dim sPath As String Dim sFile As Variant Dim ws As Workbook On Error GoTo ErrHandle sPath = ThisWorkbook.Path & "\" &...

How can I create a msgbox with Onkey code below. I want to create a message that says this function is restricted. Application.OnKey "^n", "^n"

I am sure this has been answered before, therefore I apologize in advance. Can someone please assist me in a macro code under Worksheet_calculate to simply write. If Range("N9") < Now() And Range("O9").value = False then MsgBox "xxx xxx" End If It seems simple yet I can not come up with it...

I am trying to develop a code that will autofilter a field, that will change month to month. I have a userform where the user selects the reporting month, then the script finds that month across the top of a structured table, and then drops down 1 row to select the header of the structured...

RE: Displaying a Msgbox 1 hour after the workbook opens This code is in the Workbook Open() event: Private Sub Workbook_Open() If Day(Now) = 10 Then MsgBox "Good morning" else End if This works great but displays the MsgBox as soon as soon the workbook is opened. How do I get the MsgBox...

Good Day I have the following which writes to a specific cell. I would like to extend the range for column H Thanks Sub Meet() If ThisWorkbook.Sheets(1).Range("H15:H15").Value = "" Then MsgBox "Please Enter a Meeting Number" Exit Sub End If End Sub

I tried to explain as simple and completely in this title. I have this and it is hard coded in the vb Workbook Open event code window If Day(Now) = 8 Then MsgBox "See if anyone on MrExcel can help" Else End if All this does is display a predefined Msgbox text string on a predefined day...

I have been on the web for a while now looking for solutions to my problems. I came a bit closer yet I am stacked trying to complete the next steps: Private Declare Function CreateIC Lib "gdi32" Alias "CreateICA" _ (ByVal lpDriverName As String, ByVal lpDeviceName As...

Hi, How to refer Application.WorksheetFunction to the variable which represents column of table? This macro works perfect: Public MyTable as Object Sub test () Set MyTable = ThisWorkbook.Worksheets("Sheet1").ListObjects("MyTable_table") Msgbox...

I don't know why I keep getting this error. I've tried BeforeUpate,AfterUpdate, enter,exit....none of them work. HELP, please Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean) Dim Username As String Username = TextBox2.Value MsgBox "Hello, " + Username + "...