Hi Amit
Thank you for your macro
1/Now your macro runs perfectly
If i click on one place mark, the balloon appear something like that:
Point A
Column 1 (bold): abcd (black)
Clolumn 2 (bold): dfgh (black)
Column 3 (bold): jjojo (black)
I want to modify like this
Point A
Column 1 (bold): abcd (blue)
Clolumn 2 (bold): dfgh (blue)
Column 3 (bold): jjojo (blue)
I have changed the code as follow:
If Me.TextBox10.Value <> "" Then
For ii_ctr = 0 To ii - 1
a.writeline ("<b>" & arr(ii_ctr) & "</b>: " & "<style=""color:blue>" & ActiveCell.Offset(0, ii_ctr) & "</style>" & "<br>")
Next
End If
(not successful)
2/ I want to copy the .kml file to my android phone (with GE installed), but it can’t be displayed.
Please help me.
Thank you.
Hi Amit
Thank you for your macro
1/Now your macro runs perfectly
If i click on one place mark, the balloon appear something like that:
Point A
Column 1 (bold): abcd (black)
Clolumn 2 (bold): dfgh (black)
Column 3 (bold): jjojo (black)
I want to modify like this
Point A
Column 1 (bold): abcd (blue)
Clolumn 2 (bold): dfgh (blue)
Column 3 (bold): jjojo (blue)
I have changed the code as follow:
If Me.TextBox10.Value <> "" Then
(not successful)
2/ I want to copy the .kml file to my android phone (with GE installed), but it can’t be displayed.
Please help me.
Thank you.