0

[Feature Request] Importing CSV Files Into LiveSky.com

bk3xpnLb9y

December 05, 2019 16:05

None

Follow

I know this is discussed before: Apart from suggestions to use third-party software like AP, DSP or ST, please provide option to import Observing Lists from .csv format in offline SkySafari or online LiveSky, especially export being implemented now in LiveSky.
Thank you,

• Facebook
• Twitter
• LinkedIn

1 comment

• 1
  
  bk3xpnLb9y December 24, 2019 16:52

  As a weekend project, I ended up writing this VBA macro:

  Sub Convert_CSV_to_SkyList()
  
      Dim saveas_filename As Variant
      Dim i As Long
     
      saveas_filename = Application.GetSaveAsFilename(FileFilter:="Unicode Text (*.skylist), *.skylist", Title:="SaveAs")
     
      If saveas_filename = False Then
          Exit Sub
      End If
  
      Open saveas_filename For Output As #1
      Print #1, "SkySafariObservingListVersion=3.0"
      For i = 2 To Rows.Count
          If Cells(i, 1).Value = "" Then Exit For
          Print #1, "SkyObject=BeginObject" & vbNewLine & "    " & "ObjectID=2,0," & i & vbNewLine & "    " & "CatalogNumber=" & Cells(i, 1).Value & vbNewLine & "    " & "CommonName=" & vbNewLine & "EndObject=SkyObject"
      Next i
      Close #1
        
      MsgBox "Your csv has been converted to " & saveas_filename
        
  End Sub