Ask Your Question

Revision history [back]

click to hide/show revision 1
initial version

How to concatenate 50 columns in libreoffice using macros?

Below the vba code which i want to run in libreoffice Sub parsing() For j = 1 To 1742 For i = 1 To 1720 If InStr(1, Cells(1, j), "Performance") <> 0 And InStr(1, Cells(1, j), "Tire") <> 0 Then If IsEmpty(Cells(i, j)) = False Then Cells(i, 1744) = Cells(i, 1744) & ", " & Cells(i, j) End If End If Next i Next j

End Sub

click to hide/show revision 2
None

How to concatenate 50 columns in libreoffice using macros?

Below the vba code which i want to run in libreoffice libreoffice

Sub parsing()
For j = 1 To 1742
 For i = 1 To 1720
    If InStr(1, Cells(1, j), "Performance") <> 0 _
       And InStr(1, Cells(1, j), "Tire") <> 0 Then
        If IsEmpty(Cells(i, j)) = False Then
         Cells(i, 1744) = Cells(i, 1744) & ", " & Cells(i, j)
      End If
 End If
 Next i
Next j

j End Sub

Sub