WCV限定ライブとなっていたHEARTS VOICE ROMANCEも、26日の東京公演で無事終わりました＾＾
で、恒例のグッズ紹介ですが、今回は以下の通りとなっておりましたよ♪
◎イメージブック…\3,500
◎携帯ストラップ…\2,500
◎バンダナ4種…各\1,000
◎Tシャツ(デザイン4種／サイズ2タイプ／ターコイズ付)…各\4,200
◎トートバック(白・黒)…各\2,000
◎テーブルハンガー(白・黒)…各\2,000
◎チャームブレス…\3,500
◎シルバーペンダント(ラピスラズリ／オニキス／ホワイトアゲートの３種)…各\14,000
◎ハンドメイドチョーカー(HORN／UZUの2種)…\12,000
◎ウエストチャーム(HORN／UZUの2種)…\28,000
東京最終公演追加アイテム
◎HVR数珠ブレス…\4,000
◎St.ACRIUM…\13,000（受注商品）
他にも、「石井竜也の本格的アート作品」として
◎ROMANTIC OCEAN SERIES(whale symphony)…￥320,000
◎ROMANTIC OCEAN SERIES(dolsing)…￥220,000
の受付もありました。
追加販売された数珠は、ラピスと水晶を使用したもの。
St.ACRIUMは、映画「ACRI」公開を記念して制作された香水の復刻でした。
ちなみにあたしはイメージブック、トートの黒、テーブルハンガー白・黒、ブレスと数珠を購入＾＾
入場時に貰えるチャームは三種類あり、グッズのブレスに付けることが可能だったのですが、
大阪二回、東京一回で貰えたチャームは鯨の尾が二つ、船の舵が一つ、でした☆
※写真は10月開催のNYLON CLUB GOLDEN CARNIVALのRenewal Open告知カードの表裏と、追加グッズの数珠でしたｗ
スポンサーサイト
2010.06.28 | 石井竜也&米米CLUB |
トラックバック(0) | コメント(0) |
先日まで動いていたVBAが、急にエラーで応答停止を起こす、という現象が先日起きて困りました☆
AccessとExcelの双方を利用したVBAなのですが、AccessからExcelを呼び出し、そのデータをコピーして、新規作成したBookにデータを貼り付け、保存する、といった内容でした。それが途中までは動くのに、最後の保存の時になって、"'Run'メソッドは失敗しました:'_Application'オブジェクト"というエラーがかかって、VBAを止めることも、Excelを落とすことも出来ずに、タスクマネージャから強制終了させるしかない、という状況になってしまったのです（ノ∀｀）
原因を調査してましたら、どうやらExcelの保存形式によるエラーのようでした。
このVBAはExcel2000や2007のPCで使用するため、式の途中に以下のような判定式を入れ、Excel2000以前のバージョンで開いている時は、ファイルの形式を「Microsoft Excel 97-2000 および & 5.0/95 ブック 」で保存し、Excel2007で開いている時には、「Excel 97-2003 ブック」で保存するようにしていました。
If Application.Version < 12 Then
ActiveWorkbook.SaveAs FileName:【ファイル名】, FileFormat:=xlExcel9795
Else
ActiveWorkbook.SaveAs FileName:=【ファイル名】, FileFormat:=xlExcel8
End If
でも、この「Microsoft Excel 97-2000 および & 5.0/95 ブック 」で保存したBookを編集して上書き保存すると、環境によってはエラーが発生することもある、という内容のページをネット上でみかけたので、Excel2000形式以前のバージョンで開いたときには、ファイル形式を指定せずそのまま保存し、2007で開いた時だけ旧形式で保存するよう、式を変更しました。
まぁ、実際には、下記の部分の後ろを削除しただけなのですがｗ
ActiveWorkbook.SaveAs FileName:【ファイル名】, FileFormat:=xlExcel9795
これを、
ActiveWorkbook.SaveAs FileName:【ファイル名】
のみに変更。
その後実行したところ、フリーズもせずきちんと動作するように。
旧形式であれば、全部に対応している方がよいか、と思って指定した記述が、余計なトラブルを招いてしまいました(￣▽￣〃)
まぁ、なんにせよ解決して良かったです＾＾
参考URL：http://www.keep-on.com/excelyou/2000lng4/200012/00120198.txt
http://www.excel.studio-kazu.jp/kw/20070903145442.html
AccessとExcelの双方を利用したVBAなのですが、AccessからExcelを呼び出し、そのデータをコピーして、新規作成したBookにデータを貼り付け、保存する、といった内容でした。それが途中までは動くのに、最後の保存の時になって、"'Run'メソッドは失敗しました:'_Application'オブジェクト"というエラーがかかって、VBAを止めることも、Excelを落とすことも出来ずに、タスクマネージャから強制終了させるしかない、という状況になってしまったのです（ノ∀｀）
原因を調査してましたら、どうやらExcelの保存形式によるエラーのようでした。
このVBAはExcel2000や2007のPCで使用するため、式の途中に以下のような判定式を入れ、Excel2000以前のバージョンで開いている時は、ファイルの形式を「Microsoft Excel 97-2000 および & 5.0/95 ブック 」で保存し、Excel2007で開いている時には、「Excel 97-2003 ブック」で保存するようにしていました。
If Application.Version < 12 Then
ActiveWorkbook.SaveAs FileName:【ファイル名】, FileFormat:=xlExcel9795
Else
ActiveWorkbook.SaveAs FileName:=【ファイル名】, FileFormat:=xlExcel8
End If
でも、この「Microsoft Excel 97-2000 および & 5.0/95 ブック 」で保存したBookを編集して上書き保存すると、環境によってはエラーが発生することもある、という内容のページをネット上でみかけたので、Excel2000形式以前のバージョンで開いたときには、ファイル形式を指定せずそのまま保存し、2007で開いた時だけ旧形式で保存するよう、式を変更しました。
まぁ、実際には、下記の部分の後ろを削除しただけなのですがｗ
ActiveWorkbook.SaveAs FileName:【ファイル名】, FileFormat:=xlExcel9795
これを、
ActiveWorkbook.SaveAs FileName:【ファイル名】
のみに変更。
その後実行したところ、フリーズもせずきちんと動作するように。
旧形式であれば、全部に対応している方がよいか、と思って指定した記述が、余計なトラブルを招いてしまいました(￣▽￣〃)
まぁ、なんにせよ解決して良かったです＾＾
参考URL：http://www.keep-on.com/excelyou/2000lng4/200012/00120198.txt
http://www.excel.studio-kazu.jp/kw/20070903145442.html
2010.06.18 | Excel |
トラックバック(0) | コメント(0) |
