更新 vba_code_kukan_detail_master.txt
This commit is contained in:
@@ -22,7 +22,7 @@ Sub FillFromKukanMaster(ByVal ws As Worksheet, ByVal rowNum As Long, Optional By
|
||||
Dim code As String
|
||||
|
||||
On Error Resume Next
|
||||
Set wsKukan = ThisWorkbook.Worksheets("Kukan_Master")
|
||||
Set wsKukan = ThisWorkbook.Worksheets("M1")
|
||||
If wsKukan Is Nothing Then Exit Sub
|
||||
On Error GoTo 0
|
||||
code = Trim(ws.Cells(rowNum, 3).Value)
|
||||
|
||||
Reference in New Issue
Block a user