.cells.rows.count

Good Day I have the following code that picks a random number and copies to a textbox. This all works fine. Private Sub Image22_Click() Dim v As Variant Dim MsgBox As String 'Dim strPassword As String With Worksheets("Sheet1") 'change this to the actual sheet name v =...

Good morning all, I've read sesveral similar posts, but nothing pertains to my exact case so I figured I'd make a new post and see what you think. I'm trying to sort through a database of products, each has one or more tags associated with it. I'm using InStr function to match a word with a tag...

I am trying to do a simple INDEX/MATCH using vba, but without success. I have 2 worksheets (I would attach a sample but I don't have permission) Sheet"Journal" - holding criteria for my lookup. D7 to end = 1st lookup. E7 to end = 2nd lookup. I7 to end is where the result goes The values in...

Hello all I am a first-time poster to this forum, but have read through a lot of the posts and have gained so much knowledge to help in my own journey as a relative novice in learning and applying VBA in my job as an analyst. I have a question as to how to paste certain non-contiguous columns...

Hello, I have the following vlookup vba, which is looking at the result of a sum formula =SUM(AQ2+AR2+AS2) Dim u As Long With Sheets("submissions") u = .Cells(.Rows.Count, 1).End(xlUp).Row End With With ActiveSheet LR5 = .Cells(.Rows.Count...

L.S., I am trying to populate column P with a formula that exists in cell P5. The number of rows is variable and is dependent on the number of rows in column A. As column P is pre-populated, it might be longer or shorter than column A before running the code. It should end up with the same...

Howdy, I have this code With Sheets("CDG Current") LastRow = .Cells(.Rows.Count, "C").End(xlUp).Row With .Range("N2:N" & LastRow) .Formula = _ "=IF(K2>VLOOKUP(RC4,'CDG MinMax'!R2C1:R6666C23,5,0),"""",IF(E2=E1,IF(SUMIF($E$1:$E1,E2,$N$1:$N1)+K2<0,M2,0),M2))"...

Hi All, I have some code running on my computer that is operating fine, but on another guy's computer, it gets hung up. on the Worksheet Change, I have this code (partial): Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False Application.EnableEvents = False...

Hi, have been on this forum before, only a few times but unfortunately was made redundant and lost my login details........never use your work details for logging in!!! I have a query that i hope someone can help with. I've adapted a vba code from the net to copy and paste from my data...

Hi guys, I have a problem with the following code in VBA. I'm very new to VBA, so I can't see what seems to be the problem.... The followin code gives me Run-time error 1004 autofilter method of range class failed.... Sub SplitData() Dim ark As Worksheet Dim arkNew As Worksheet Dim Data As...