activewindow.smallscroll

I used to have this working but then we made changes. Can you help me? this macro opens up and pastes each sheet into one sheet. Sub Aisles() ' ' Aisles Macro ' ' ActiveWindow.ScrollRow = 50 ActiveWindow.ScrollRow = 48 ActiveWindow.ScrollRow = 46 ActiveWindow.ScrollRow = 43...

Hello, I have a macro that is pulling data from a sheet Cycle_14a_Output.txt. There will be multiple sheets used for this project, all name Cycle_XXa_Output.txt. I've added an input box to ask what the number of the file should be. How can I add the Input Data into the formula string? <Code>...

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"...

Hey everyone, The following code helps in arranging the columns across multiple sheets to be same as active sheet when enter is pressed on a cell. Code being perfect however is tedious due to repetitive pressing of the Enter Key. Instead I could think of whenever the active sheet is exited and...

Currently I am using a lengthy vb code but when Its playing, we can see all things on screen, can someone help to shorten it where it can performs things in background? Sub New_TCS() Range("O6").Value = Range("O6").Value + 1 For sh = 1 To Sheets.Count Sheets(sh).Visible = -1 Next...

Hi All, I'm trying to show the inverse percentage of a number, and I am struggling to figure out how to do it. Can you please give a it a look and let me know if you can help me. So basically what I'm trying to achieve is if its comes up as 99% I would like it to show as 1%. Here is the Macro...

Hi, I was previously given some code that would take a list and sort it by check # and then subtotal amounts by check # with a grand total at the end. The code was associated with a 'button' on the page to click whenever you wanted to create the summation page. When I was given the code I must...

I have a database to be updated every month. I need to filter the table by each criteria in cell C8 and then open another file copy the values from column O and paste them in the database and go to the next filter criteria open the next file and repeat all in the same column. Then for the next...

Hello, I'd like to automate the process of moving page breaks within a fairly small pivot table. I just recorded the following macro while I manually adjusted page breaks to my liking. Here's the code: ActiveWindow.View = xlPageBreakPreview ActiveWindow.SmallScroll Down:=-33...

Hi everyone, I am trying to copy and paste the value from B57 on the active cell using the code below, but right now it's pasting on D4. Is there a way to change D4 to be the active cell instead? Thanks in advance for the help! Sub copypaste() ' ' copypaste Macro ' ' Keyboard Shortcut...

I have the code below which works fine, however I would rather change the sheet references in the code to the actual sheet numbers ie sheet20.select instead of Sheets("132627 Liverpool Lime Street").Select when I try this it crashes thanks Sub LNW_N_SLIDES() ' ' Macro3 Macro ' '...

Hello all, I recorded a macro that correlates a price series against an ascending sequence of numbers. The key steps are: 1) populate the adjacent column with ascending numbers i.e. 1,2,3,4,5... 2) Use the correl function to find the correlation between the price and the ascending numbers. A...

Hello All , I tried to post this earlier but i cannot find it so Im re-posting now I have a Workbook with 3 sheets , Sheet 1 is a List of Car makes/years organized my #of consumer requests , Sheet 2 is a top 10 of Sheet 1, Sheet 3 is a list of completed models. Sheet 1 has data in A/B/C/D...

Hi Peers, Can i get your advice to see if there is a quicker way of deleting rows than the piece of code that i wrote.

Hello, Please can you help. I would like to loop the following macro through worksheets which are labeled 1 through 31 Range("A6:A25,C6:C25,C27").Select Range("C27").Activate ActiveWindow.SmallScroll Down:=21 Range("A6:A25,C6:C25,C27,A32:A51,C32:C51,C53").Select...

Getting Errors when I run the code below. If i different data in the cells from when I recorded the macro I get errors. Sub Clear_Sheet() ' ' Clear_Sheet Macro ' ' Range("A5:A39,C5:H39,K5:P39,T5:AA39,K1:O1,F1:I1,F2:I2,Z2").Select Range("Z2").Activate ActiveWindow.SmallScroll...