update Generic Master bas4

This commit is contained in:
updsv7
2026-04-15 11:01:25 +09:00
parent d89fc2e8b1
commit 5e906f3300
8 changed files with 12 additions and 1 deletions

View File

@@ -8,7 +8,7 @@ Private Sub Worksheet_Change(ByVal Target As Range)
If Trim(cell.Value) = "" Then If Trim(cell.Value) = "" Then
Call ClearRowData(Me, cell.Row) Call ClearRowData(Me, cell.Row)
Else Else
Call FillFromKukanMaster(Me, cell.Row) Call FillFromZ1(Me, cell.Row)
End If End If
Next Next
End If End If
@@ -343,3 +343,14 @@ Sub M1_Export()
MsgBox "CSV export completed. Total data rows: " & rowCount, vbInformation MsgBox "CSV export completed. Total data rows: " & rowCount, vbInformation
End Sub End Sub
Sub M1_SortDataRowsByC()
Call SortDataRows(3)
End Sub
Sub M1_ToggleAutoFilter()
Call ToggleAutoFilter(6)
End Sub
Sub M1_AutoFitColumnWidth()
Call AutoFitColumnWidth(3, 14)
End Sub