Question about the criteria format in match function

[luissuarez]

Sub Insertacts()




Dim sheetsch As Worksheet
Set sheetsch = Sheet1




Dim sheeteat As Worksheet
Set sheeteat = Sheet2




colnum = Application.WorksheetFunction.Match(sheeteat.Range("F2"), sheetsch.Range("A1:G1"))
rownum = Application.WorksheetFunction.Match(sheeteat.Range("G2"), sheetsch.Range("A1:A25"))




sheeteat.Range("A2").Copy
sheetsch.Cells(rownum, colnum).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Sheets("Schedule").Select




End Sub

Hello everyone! I am trying to create a timetable where activities can be added from another sheet. I wrote the above codes and it works smoothly except a few bugs.


The activity cannot be inserted into a correct row when I put the time of 13:00 or 16:00 in Range("G2") in Sheet2. It apprears on the row of 12:00 and 15:00 in Sheet1 respectively instead. Anyone knows why that is the case? Thanks a lot.

http://www.filedropper.com/timeschedule

 

[Peter_SSs]

Duplicate to http://www.mrexcel.com/forum/excel-questions/930570-question-about-criteria-format-match-function.html

Please do not post the same question multiple times. Questions of a duplicate nature will be locked or deleted, per #12 of the Forum Rules.

Any bumps, clarifications, or follow-ups should be posted to the linked thread.