rownum

Hello all, I am trying to figure out the VBA to replace all negative values in a specific range, on a specific worksheet "MonteCarlo", Range "S3:AMD163". I have tried unsuccessfully couple of times with the following code: Amy help from a more seasoned VBA writer would be appreciated! Sub...

In the following code I have 'FitToPagesWide' and tall = 1, but when run, it still shows up on two pages. What am I missing here? Much thanks for any help. Sheets("Original").Select Do Until ActiveSheet.Name = "zzz" ActiveSheet.Next.Select RowNum =...

Hello Geniuses! I am creating a form and trying to make it as user friendly as possible, creating command buttons that will automatically copy all formulas and data validations from the current line, and insert them in the desired row (same sheet). For some reason, this isn’t copying my...

Hi, I have 2 macros, and need to use the IE object in the second macro that is declared and set in the first. How do I set that up? Sub UpdateOwensCards() Dim IE As New SHDocVw.InternetExplorer Dim IE As New SHDocVw.InternetExplorer Dim HTMLdoc As MSHTml.HTMLDocument...

Hello all: So I have been using this from mrshl9898 that copies a row nth times based on a cell value (A1 to K1, J1 times). It works but I want to use it to loop until the worksheet is empty. I will be processing thousands of rows, so thousand clicks will not work and also "Cells(rownum, 1)"...

Hi everyone, I am trying to name a range from VBA with ranges that changes. Here is my code RowNum = iReport.Cells(Rows.Count, 1).End(xlup).Row iSht.Names.Add Name:="NamedRange", RefersToR1C1:="=iSolReport!R2C2:R2229C22" I want to be able to change R2229 to RowNum Thanks

Hi can anyone help? I have this UserForm code that Selects Rows based on Column Values and I want to add an exit sub if nothing is found for 'findcolB' as it goes to Debug when nothing id found. Sub SelectRowsAB() Dim findcolA As Long Dim findcolB As Long Dim Copyrange Dim...

Hi How do I return a value to my sub procedure from a function? I created two functions to get the last row and column of a worksheet. However, after the function is ran, it resets to zero. How do I save the function amount? Option Explicit Option Base 1 Dim colNm As String Dim rowNum As...

This code is doing everything I want it to do, except the output is wrong. Specifically, when "chartstring" is defined, it is defined by the sheet "Summary" from a range spanning A2 to my desired column--but row 3 instead of 2 as is hardcoded into the definition! What's going on here...

Hello, I am trying to import an Oracle RDB Recordset to Excel via Microsoft VBA. I currently have a working SQL string but would like to return just the top 1000 rows. Normally I would use "SELECT TOP 1000" for an SQL Server. I understand that this will not work for Oracle, so I tried Oracles...