![]() ![]() If Not Intersect(Target, Me.Range("P1")) Is Nothing Then ![]() ![]() If Not Intersect(Target, Me.Range("K1")) Is Nothing Then If Not Intersect(Target, Me.Range("F1")) Is Nothing Then If Not Intersect(Target, Me.Range("A1")) Is Nothing Then I have attached my code below and marked where I am getting the error message.Īny help is greatly appreciated, I'm stuck!Ĭode: Private Sub worksheet_Change(ByVal Target As Range) This code had been working and I saved the excel file while I waited on my materials to arrive, so now that they are here and I wanted to do one last test run, it doesn't work and I am getting that error, although I have not changed anything. The idea is when the barcode gets scanned into cell A1, it will search through the data in the designated row (in my case row B), and when it finds that entry, it will put a time out stamp under the time in stamp. The idea was when that barcode gets scanned once, the time will go into the next cell (this is done with a formula and works great), at the end of the day, the materials must be scanned back in, so I made a macro for the top of each day (Monday is in cell A1). I had created a macro in VBA to track barcodes by day of the week. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |