application.goto

All, I developed a process for a small data set and it now needs to scale to cover large data grabs from outside of the workbook (in closed workbooks on a drive) then have the macro deposit the output into new workbooks in a different file folder (currently my code drops the new workbooks into...

I am receiving a runtime error 1004 in VBA. It has been driving me crazy. I run a similar line of code three times before this one and this is the only one I am getting hung up on. Somehow it seems I have improperly set the range? It is giving the reference is not valid. Any help would be...

Hello, I am new to excel VBA and have been getting stuck on the "run-time error'1004. The formula is missing a range reference or a defined name" the error is in the following line Range("RIFEquipmentTag").Value = RIFEquipmentTag I believe I have set it up the same way as the other items...

1 change event worked on the worksheet until it got too large. I split the 1 event into two events. One titled “Private Sub Worksheet_Change1(ByVal Target As Range)” which I want to work for changes in range E38:H70 The 2nd event “Private Sub Worksheet_Change(ByVal Target As Range)” is for...

Not sure why this gets an error. It seems pretty simple. Error occurs at the ElseIf "Application.GoTo ActiveWorkbook.Sheets("Scores").Cells(3, 1)" line I replaced it with the App GoTo line above and if functions as it should, so its not liking the "Scores" name. Spelling correct, same...

Hello everyone, I am attempting to remove duplicates in three columns individually. The data is a trial balance on a sheet entitled TB. I am selecting columns A, B, and C and copying those columns to a new sheet called Criteria. Once I get the columns to Criteria, I need to remove the...

hi, using the following to prompt the msgbox:- Sub gototots()Range("AI4").Select Application.Goto Reference:="R999C34" ActiveWindow.SmallScroll Down:=-12 Range("AI983").Select If MsgBox("Enter Yes to goto A174?", vbYesNo) = vbYes Then Application.Goto Reference:="R117C1"...

Hello! I usually come here for help when I can't find what I'm looking for, so maybe someone can help me. I have a column with cell address: <tbody> $B$896 $F$994 $N$103 $V$961 $AH$509 $AX$222 $BB$1050 </tbody> Now wat I want, is to go automatically trough the list, and place...

Hello, I can't figure out why Application.ScreenUpdating is not working, the screen flickers every time (after entering data on G2). I tried to figure it out from other posts, but it seems different things work for different people so I'm showing the code I'm struggling with bellow. Please...

I have a macro enabled workbook through which the user can select a single .csv file, which is then edited by a macro in the relevant module, and the edited version saved alongside the original, in the original folder. I am now trying to change it so the user can select multiple files and have...

Hello, Does anyone think this is too clunky? The below is copying the value of J2 cell and placing the values on the Save sheet. It works but it's slow? Private Sub CommandButton5_Click() 'Save ActiveX ButtonSheets("Save").Select Application.Goto reference:="R1C1" 'Rows("1:1").Select...

Hi, i have the below macro which removes values in column H when column I has a "Yes" in. is there a way to change this into an automatic VBA that runs in the background? Sub Remove_Column_H_Values()' ' Remove_Column_H_Values Macro ' ' Application.Goto Reference:="R7C9"...

Hi everyone: I've been running a macro which pulls in historical stock price data for a series of tickers (range names of tick1, tick2, tick3, etc.). I've yet to combine the 'fetcher' workbook into the destination workbook, but no matter. What I'd really like to do is condense the code into a...

Good morning, I have this Select Case code: Sub Button_Goto_Correct_Consignee()Dim BR As Long BR = Sheets("H").Range("AL" & Sheets("H").Shapes(Application.Caller).TopLeftCell.Row - 5).Value Select Case BR Case Is = 1: Application.GoTo...

Good day Demigods, I have the following code sitting in "ThisWorkbook": Sub Button_Goto_Correct_Consignee() Dim BR As Integer BR = Range("'H'!AL3") Select Case BR Case Is = 1: Application.GoTo (ActiveWorkbook.Sheets("MDZ_AD1").Range("A1")) Case Is = 2...

Hi all, I have the following Macro but want to clean it up, Essentially it inputs a cycle step Number on one sheet then copies the values in a named range and pastes them into a another sheet by selecting a named range. Any help is much appreciated. The code Module is in the following...

Hi all, I would like to change one line in my recorded macro: Sub Macro3() ' ' Macro3 Macro ' ' Range("K11").Select Selection.Copy Sheets("MANAGER 1").Select Application.Goto Reference:="R3C7" Sheets("Sheet1").Select Range("J12").Select Application.CutCopyMode =...

I have researched this for several hours and attempted every option and fix I could find or think of, and having failed I figure it's time to ask about my specific need. I have a formula in cell D2 of sheet7("Missions") that first chooses a table from six table options on the same worksheet...

<!--[if gte mso 9]><xml> <o:OfficeDocumentSettings> <o:AllowPNG/> </o:OfficeDocumentSettings> </xml><![endif]--> Hi I have a user form that comes up from another userform the new userform will find a range. Private Sub CommandButton4_Click() usf3 Unload Me End Sub I can’t seem...

Hello, I have a repetitive task in excel, I need to refresh a pivot table select the name and copy and paste data. This is what I have done so far. Sheets("Pivot").Select Range("B15").Select ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh...