Simplify CSV header export

vba_code_kukan_detail_master.txt

@@ -387,18 +387,8 @@ Sub ExportMasterDetailData()
     End If
     
     ' Use constant for header
-    Dim headerList As Variant
-    headerList = Split(CSV_HEADER, ",")
-    
-    ' Build CSV
     Dim csvContent As String
-    Dim j As Long
+    csvContent = CSV_HEADER & vbCrLf
-    
-    For j = 0 To UBound(headerList)
-        If j > 0 Then csvContent = csvContent & ","
-        csvContent = csvContent & headerList(j)
-    Next j
-    csvContent = csvContent & vbCrLf
     
     ' Data: C,G,H,I,J,K,L,M,N,O,P (skip D,E,F)
     Dim r As Long