tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル セールのコピー
投稿日: 2013/07/22(Mon) 09:51
投稿者GC
いつもお世話になっています。

事前にExcelで表を作ってあります。
一つの表幅が13行があります。
一ページに三つの表が並んでいます。
表の中数値が変わっています。
表の性格は
長さが不定長です。
今のやり方、この表をコピーしてやっています。
xlSheet.Range("A4:AN16").Copy
   xlSheet.Paste Destination:=xlSheet.Range("A21")
   xlSheet.Paste Destination:=xlSheet.Range("A37")
   xlSheet.Paste Destination:=xlSheet.Range("A54")
   xlSheet.Paste Destination:=xlSheet.Range("A68")

問題:
コピーのほうです。
縦列が問題がなく
行の幅が変わっています。
元表の行の幅と違っています。
(元表の行の幅が同じではないです。)
(元表の列の幅が同じではないです。)
やってみたのですが、
コピー範囲の行幅が調整したのですが、
調整した幅をコピーされています。
ちょっと困っています。

全く同じようにコピーしたいのですが、
どうすればいいでしょうか。

よろしくお願いします。
環境:VB6+XP

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。