[[20110701111008]]　『項目ごとにシートを作成』（みな）　ページの最後に飛ぶ

『項目ごとにシートを作成』（みな）

 　
[[20050721182519]] を参考に、シートの作成は出来るようになったのですが、
 タイトル行が1行でなく、3行あります。
 どこを訂正したらタイトル行すべてをデータの上に表示することが出来ますでしょうか？
 ご指南いただければと思います。よろしくお願いします。

 先のコードは何度か改版していまして、
[[20110301184111]]
 が最新になっています。

 dataStartLine を変更してみてください。
 (Mook)

 Mookさま＞
 できました。ありがとうございますm（＿ ＿）m
 （みな）

 Mookさん

 こんにちは、半平太です。

 (みな)さんが冒頭で照会された
 こっちの方のマクロのことなんですが、
 　↓
[[20050721182519]] を参考に、・・・

 データの書き込みに挿入メソッドが使われていました。
 　　　　　　　　　　　　　　　　↓
 >Worksheets(sheetName).Rows(1).Insert Shift:=xlDown

 私の感覚では、PasteSpecialメソッドにするのですが、
 Insertを使うことにした意味を教えていただけませんか？

 (半平太) 2011/07/01 16:02

 返信が遅れました。

 うーん、悲しいかな、政治家の答弁ではありませんが、まったく記憶にございません。
 何か考えがあってのことなのか、未熟ゆえの選択なのか・・・。
 最初の[[20050721182519]] の時点では必然性はなさそうですね。

 [[20110301184111]] のコードでは複数行単位での分割や、セルの結合を許容するように
 しているので、Insert が楽かなとは思います。
 PasteSpecial はバージョンによってサポートするオプションが拡張されたりしている
 ようですし、挙動の検証がいろいろと面倒そうなので。

 でも、単純な仕様であった初版のときには、やっぱり貼付けで問題ないですね。
 (Mook) 2011/07/02 08:31

 Mookさん

 ご回答、有難うごさいます。

 >PasteSpecial はバージョンによってサポートするオプションが拡張されたりしている
 >ようですし、挙動の検証がいろいろと面倒そうなので。

 そう云うお考えでしたか。なるほどです。
 ・・と云うか、真剣に挙動の検証と云うのをやったことがないです (^^ゞ

 私自身は、DeleteとかInsertは、システム的にストレスが掛るのではないかと
 漠然と(検証もせず)考えておりまして、付け足しで済むなら、
 それに越したことがない、と云う風な考え方をしております。

 いずれにしても、Insertにはそれほど深い意味はなかったと理解させていただくことにします。

 お手数をお掛けしました。　m(__)m

 (半平太) 2011/07/02 15:32

コメント返信：

[ 一覧(最新更新順) ]

[[20110701111008]] 『項目ごとにシートを作成』（みな） ページの最後に飛ぶ

[[20110701111008]]　『項目ごとにシートを作成』（みな）　ページの最後に飛ぶ