(Solved) – Trying to change value of the next empty cell in a column

(solved)-–-trying-to-change-value-of-the-next-empty-cell-in-a-column

I have some experience with VBA but not a lot. This feels like it should be so dang simple but I cant figure it out to save my life. lol. All I am trying to do is to input a value into the next empty row in a column. I tried using rows.count and off setting it like you would with a paste but it doesn’t seem to work. I was able to get it to change the value in the first cell but not to look for the next empty and change its value. Any help would be greatly appreciated.

Private Sub CommandButton1_Click()
   Dim wbCount As Workbook
   Set wbEntry = ThisWorkbook


   wbEntry.ActiveSheet.Range("B3").Copy

   Set wbCount = Workbooks.Open("U:MO# Count.xlsm")

   Worksheets("Golf Cart").Paste _
       Destination:=Worksheets("Golf Cart").Range("V5")


   Worksheets("Golf Cart").Range("C2").Value = 1

   wbEntry.Activate

   Application.CutCopyMode = False

   wbEntry.ActiveSheet.Range("O1").Select

End Sub

What I have works perfectly except for it not searching for the next empty cell in “C” and change the value to “1”.

Leave a Reply

Your email address will not be published. Required fields are marked *