■アップロードの設定


 

Append timestamp to tasklist name
　アップロードするタスクリスト名にタイムスタンプを付加。

Append own suffix
　アップロードするタスクリスト名に固定文字を付加。

Create new tasklists
　アップロードするタスクリスト名をそのまま採用。
　既存のタスクリストと重複する場合には同一名で別のタスクリストが作成される。

Add tasks to existing tasklists
　既存のタスクリストと同一名のタスクリストにタスクが追記される。
　その場合、重複タスクがあっても同一名で重複してタスクが追記される。
　存在しないタスクリストなら新規にタスクリストが作成される。　

Replace tasklist contents
　存在しないタスクリストなら新規にタスクリストが作成される。　
　既存のタスクリストと重複する場合には既存のタスクリストのタスクがクリアされた後にタスクが追記される。
　同一名のタスクリストが2つ以上ある場合には一つだけクリアされる。

Skip duplicate tasklists
　既存のタスクリストと重複する場合にはインポートされない。

Delete all tasklists before import
　既存のタスクリストを削除してからインポートする。　　

注意.デフォルトタスクリストはGoogleTasksの仕様により削除できない。

Subject
Start Date
Due Date
Reminder On/Off
Reminder Date
Reminder Time
Date Completed
% Complete
Total Work
Actual Work
Billing Information
Categories
Companies
Contacts
Mileage
Notes
Priority
Private
Role
Schedule+ Priority
Sensitivity
Status

iCal_to_CSV(EXE形式)

ical_to_csv xxxx.ics とするだけです。
xxxx.ics はiCalファイル名です。
xxxx.CSV に変換されます。

iCal(エンコードShift-JIS)をCSVに変換するRubyコードを作成

#! ruby -Ks
# coding:windows-31j
#! /usr/bin/env ruby

require 'rubygems'
require 'csv'
require 'nkf'
require 'ri_cal'
require 'kconv'
require 'vr/vrdialog'

#OCRA でコンパイルする時に内容チェックさせない。
unless (defined?(Ocra))
  #入力ファイル名を引数で受け取る。引数がなければ中止。
  inf=ARGV[0]
  if inf.nil? then
    SWin::Application.messageBox("処理対象のファイルをドラッグして起動するか、

バッチファイルで
　ical_csv 対象ファイル名 
で起動してください。

終了します。" ,"エラー",0)
    exit
  else
    SWin::Application.messageBox("iCSファイルをCSVに変換します。" ,"処理開始",0)
  end

  f = open(inf, "r")
    str = f.read
  f.close
  
  #入力ファイルがShift-JISではないかもしれないので強制変換して.tmpに出力
  ott=File.dirname(inf)+"/"+File.basename(inf,".*")+".tmp"
    ot= open(ott,"w")
    str_sjis=NKF.nkf('-s -Lw',str)
    ot.print str_sjis
  ot.close

  #.tmpから入力して.csvに出力すると宣言
  inf=File.dirname(inf)+"/"+File.basename(inf,".*")+".tmp"
  otf=File.dirname(inf)+"/"+File.basename(inf,".*")+".csv"

  ics = open(inf)
  cal = RiCal.parse(ics)
  # calendarという文字列があればカレンダーと判断　<<<<　必要に応じて修正
  calortask=cal.first.prodid.downcase.index(" calendar")

  CSV.open(otf, 'w') do |writer|
    unless calortask.nil? then
      #カレンダーと判断した時のヘッダ
      writer << ["Subject","Start Date","Start Time","End Date","End Time"," Meeting Organizer"," Description", "Location","Categories","Attendee","Status","Duration"]
    else
      #タスクと判断した時のヘッダ
      writer << ["Subject","Start Date","Due Date","Status","Date Completed","% Complete","Categories","Notes","Priority"]
    end
  end

  unless calortask.nil? then
  
    cal.first.events.each do |event|

      p1= event.summary

      x=event.dtstart
      unless x.nil? then
        p2= x.strftime("%Y/%m/%d")
        p3= x.strftime("%H:%M")
      else
        p2= ""
        p3=""
      end

      x=event.dtend
      unless x.nil? then
        p4= x.strftime("%Y/%m/%d")
        p5= x.strftime("%H:%M")
       else
        p4= ""
        p5=""
      end

      x=event.organizer
      unless x.nil? then
        p6= x
      else
        p6= ""
      end

      x= event.description
      unless x.nil? then
        p7= x.gsub(/(
|
|
)/, '
')
      else
        p7= ""
      end

      x=event.location
      unless x.nil? then
        p8= x
      else
        p8= ""
      end
      
      x=event.categories
      unless x.nil? then
        p9= x
      else
        p9= ""
      end
      
      x=event.attendee
      unless x.nil? then
        p10= x
      else
        p10= ""
      end
      
      x=event.status
      unless x.nil? then
        p11= x
      else
        p11= ""
      end
      
      x=event.duration
      unless x.nil? then
        p12= x
      else
        p12= ""
      end

      CSV.open(otf, 'a') do |csv|
        unless p1.nil? then
          row = [p1,p2,p3,p4,p5,p6,p7,p8,p9,p10,p11,p12]
          csv << row
        end
      end
    end
    # cal.first.events.each do に対応
    
  else
  #calortask=nil なのでtodoと判断した時の処理

    cal.first.todos.each do |todos|
      
      x=todos.summary
      unless x.nil? then
        p1= x
      else
        p1= ""
      end
      
      x=todos.dtstart
      unless x.nil? then 
        p2= x.strftime("%Y/%m/%d %H:%M")
      else 
        p2= ""
      end

      x=todos.due
      unless x.nil? then
        p3= x.strftime("%Y/%m/%d %H:%M")
      else
        p3= ""
      end

      x=todos.status
      unless x.nil? then
        p4= x
      else
        p4= "Not Started"
      end

      x=todos.completed
      unless x.nil? then
        p5= x.strftime("%Y/%m/%d %H:%M")
      else
        p5= ""
      end
      
      x=todos.percent_complete
      unless x.nil? then
        p6= x
      else
        p6= ""
      end
      
      x=todos.categories
      unless x.nil? then
        p7= x
      else
        p7= ""
      end
      
      x= todos.description
      unless x.nil? then 
        p8= x.gsub(/(
|
|
)/, '
')
      else
        p8= ""
      end
      
      x=todos.priority
      unless x.nil? then
        p9= x
      else
        p9= "Normal"
      end
      
      CSV.open(otf, 'a') do |csv|
        unless p1.nil? then
          row = [p1,p2,p3,p4,p5,p6,p7,p8,p9]
          csv << row
        end        
      end
      
    end # cal.first.todos.each do に対応
  end #calortask=nil なのでtodoと判断した時の処理を閉じる
  SWin::Application.messageBox(otf+"に出力しました" ,"完了",0)
  ics.close
  a=File.delete(*inf)
end

右クリック（Macの場合はしばらくクリック）して、「対象をファイルに保存」などしてください。

Remember The Milk の iCal の PRODID
　PRODID:-//Remember The Milk//rtm.Service.iCalendar.Export 3.0//EN
Google Calendar の iCal の PRODID
PRODID:-//Google Inc//Google Calendar 70.9054//EN

　iCal_to_CSV.rb  xxxxx.ics
　のように引数でインプットファイルを指定します。
　これにより xxxxx.CSV が作成されます。
　ただし、RUBY.EXE に PATH が通っていなければエラーになります。

#! ruby -Ks
# coding:windows-31j
#! /usr/bin/env ruby

# GCalExcel.rb
# Coded in Ruby 1.9.3

require 'rubygems'
require 'vr/vrdialog'
require 'spreadsheet'
require 'nkf'

#引数チェック(この　if　then　ブロック使わないなら vr/vrdialog　Gem　はrequire不要)
    inf=ARGV[0]
  if inf.nil? then
      SWin::Application.messageBox("処理対象のファイルをドラッグして起動するか、

バッチファイルで
　GCalExcel.rb 対象ファイル名 
で起動してください。

終了します。" ,"エラー",0)
      exit
  else
    SWin::Application.messageBox("GCalExcelファイルをGoogleカレンダー対応CSVに変換します。" ,"処理開始",0)
  end
  
#引数で渡されたファイルから入力して.csvに出力すると宣言
  book = Spreadsheet.open(inf,"rb")
  otf=File.dirname(inf)+"/"+File.basename(inf,".*")+".csv"
  o=File.open(otf,"w")

#引数で渡されたファイルから入力して.csvに出力すると宣言
book.worksheets.each do |ws|

    #ヘッダチェック:Location(GCal2EccelのWhere)格納列はどこか?
  for i in 0..10 
    if ws[0,i]=="Where" then 
      LocationCol=i
    end
  end
    #ヘッダ出力
      record = []
      record << ["Subject","Start Date","Start Time","End Day","End Time","Description","Location","All Day Event"]
      o.puts NKF.nkf('-w80 -Lu',record.join(","))

    #一行ずつ処理
  ws.each do |row|
      record = []
      allDayEvent=TRUE
    unless row[3][0,5]=="24:00" then 
      allDayEvent=FALSE
    end
      unless row[0]=="Title" && row[1]=="Start" then
          unless row[0].nil? then row[0]=row[0].gsub(",","") end 
          unless row[4].nil? then row[4]=row[4].gsub(",","") end 
          unless row[LocationCol].nil? then row[LocationCol]=row[LocationCol].gsub(",","") end 
      record << [row[0],row[1][0,10],row[1][11,5],row[2][0,10],row[2][11,5],row[4],row[LocationCol],allDayEvent]
                #日付時刻のデータの正当性チェックをしていないので必要ならチェック手順を追加して下さい
      o.puts NKF.nkf('-w80 -Lu',record.join(",").gsub(/
/,":|:"))
      end
  end
end

  #使用ファイルのクローズ処理
  o.close
  book.io.close

#-------------------------------------------------- 
#---- Additional Setting for Spreadsheet Gem  ----#
#-------------------------------------------------- 

module Spreadsheet
  class Workbook
    attr_accessor :io
  end
end

右クリック（Macの場合はしばらくクリック）して、「対象をファイルに保存」などしてください。

#! ruby -Ks

 GCalExcel.rb   xxxxx.xls
　のように引数でインプットファイルを指定します。
　これにより xxxxx.CSV が作成されます。
　ただし、RUBY.EXE に PATH が通っていなければエラーになります。