From b6d6101a7c0dd18618eff3e91467295f36008b02 Mon Sep 17 00:00:00 2001 From: updsv7 Date: Mon, 13 Apr 2026 16:55:21 +0900 Subject: [PATCH] Split E column into E and F --- vba_code_kukan_detail_master.txt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/vba_code_kukan_detail_master.txt b/vba_code_kukan_detail_master.txt index 8c9f48a..f196dd3 100644 --- a/vba_code_kukan_detail_master.txt +++ b/vba_code_kukan_detail_master.txt @@ -51,7 +51,8 @@ Sub FillFromKukanMaster(ByVal ws As Worksheet, ByVal rowNum As Long, Optional By For i = 7 To lastRow If Trim(wsKukan.Cells(i, 3).Value) = code Then ws.Cells(rowNum, 4).Value = Trim(wsKukan.Cells(i, 4).Value) & ": " & Trim(wsKukan.Cells(i, 5).Value) - ws.Cells(rowNum, 5).Value = Trim(wsKukan.Cells(i, 6).Value) & "~" & Trim(wsKukan.Cells(i, 7).Value) + ws.Cells(rowNum, 5).Value = Trim(wsKukan.Cells(i, 6).Value) + ws.Cells(rowNum, 6).Value = Trim(wsKukan.Cells(i, 7).Value) If setG Then ws.Cells(rowNum, 7).Value = "1" Call MakeFDropdownByG(ws, rowNum)