見慣れぬ文字にハァハァノヽァノヽァ／ヽア・・・（錯乱
2005年12月16日見慣れぬ文字にハァハァノヽァノヽァ／ヽア・・・（錯乱
■「01-08」と入力したいだけなのに。〜Excelと日付入力〜
「00-00」という書式の文字列をExcelVBAで扱おうとして・・・
思いっきり引っかかる。
「Excel初級編テキストの最初の方の単元でやる内容ですよ？
よく新入社員教育のセンセーなんてやってましたねぇ？」
とか言われそうな内容。
Excelの日付の扱いなんざ嫌いだ。
’データを高速コピー
Dim r as Long
Dim t(0 to 500 - 1， 0 to 1) as Variant
For r = 0 to 500 - 1
t(r，0) = r
’↓元のセルには「’01-08」が入っているが「’」はつけたくない。
t(r，1) = Cells(1，1).Value
Next
’↓書式(NumberFormat)が「;;;」のセルにコピーしたい。
Range(Cells(11，1)，Cells(510，2)) = t
※VariantをStringにするとCells(11〜510，1)に「01-08」
（アポストロフィなし）がコピーされる。
ただしA列も文字列になってしまう。
※「’」をつけるならt(r，1) = Cells(1，1).Valueは
t(r，1) = Cells(1，1).PrefixCharacter & Cells(1，1).Value
とすべき。
最終的につけなくて良い方法で解決。
いやらしいロジックが増えちまったが。
■コスプレ
立ち居振舞いというか仕草が伴わないからコスプレなんだな、と理解した。
本職さんがカッコイイのはその格好が振る舞いとセットになってるから、
役者さんがカッコイイのは恥ずかしい格好でもその人間になりきっちゃうからなんだろーね。
・・・と、サラリーマンのコスプレ男がほざく。
■フェチ
フェチはあるかと言われれば・・・フェチしかありません、と。
コメント