• ベストアンサー

EXCEL 行と列のピッチをそのままでコピーしたい

初心者です。よろしくお願いします。 今sheet1のY500~BC700までにコピー元があります。 Y500~BC700には列の幅が異なり同一ではありません。また行の幅も異なって同一ではありません。さらに文字の大きさも様々です。 それをSheet2に 列・行の幅同じで  異なる文字の大きさもそのままでコピーしたいのですが どのようにしたらよいのでしょうか よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • gyouda1114
  • ベストアンサー率37% (499/1320)
回答No.3

>今sheet1のY500~BC700までにコピー元があります。 >貼り付け先はSheet2のA1にしたいのですが sheetをコピーし、A列からX列及び1行から499行まで削除ではいけませんか シートのコピー(ドラッグ操作) http://www15.plala.or.jp/PCwakaba/excel/excel92.html

その他の回答 (2)

  • hige_082
  • ベストアンサー率50% (379/747)
回答No.2

マクロなら出来ます マクロはご存知ですか? Sub Macro1() ' ' Macro1 Macro ' マクロ記録日 : 2009/1/4 ユーザー名 : ' ' Columns("A:A").ColumnWidth = 16.25 Rows("1:1").RowHeight = 30 With Selection.Font .Name = "MS Pゴシック" .Size = 22 .Strikethrough = False .Superscript = False .Subscript = False .OutlineFont = False .Shadow = False .Underline = xlUnderlineStyleNone .ColorIndex = xlAutomatic End With End Sub マクロの記録で記録しました コピー元のこれらの項目の値を コピー先の項目に値をあてはめれば出来ます 詳細はヘルプを参照してください

  • web2525
  • ベストアンサー率42% (1219/2850)
回答No.1

シート全体をコピーして貼り付けると同一になります。 セル範囲のコピー貼り付けでは列・行の幅・高さまではコピーされません。 (入力文字のフォントサイズによっては高さに関してはフォントサイズに合わせて変更される場合はあります) 原因:文字サイズや書式はセルに関連付けられていますが、行の幅・高さはシートに関連付けられているためです。

pi-man39
質問者

補足

言葉が足りなくてすみません。 貼り付け先はSheet2のA1にしたいのですが、 あわせてよろしくお願いします。

関連するQ&A

  • EXCELで行の高さ、列の幅を保ったままコピーするには

    エクセルで作った表の行の高さ、列の幅を保ったまま別のシートにコピーする方法はありますか?今は表全体を選択して別シートにコピーするとデフォルトの高さ、幅に表がはめ込まれてしまい、再度手直ししなければならない状態です。エクセル2000を使用しています。宜しくお願いします。

  • エクセルVBAのコピーについて

    初心者です。 表を別のシートにコピーしたいのですが、列と行の幅がコピーされません。どうすれば列と行のコピーができるのでしょうか。 pastespecial で引数を指定するのでしょうが、formats ではないでしょう? copy destination:= で別のシートにコピーをしても罫線の行と列の幅が元の幅と異なってしまいます。教えて! エクセルで形式を選択してコピーで、すべてをコピー、でも同じ現象が起きます。列をコピーしてから、すべてをコピーするとうまく行くのですが、VBAではどう書けばいいのでしょうか。

  • エクセルで列・行の長さをそのままでコピーしたい

    こんにちは。 エクセルで文章(表)を作って、同じ枠組でもう1個表を作りたい・・・っていう時、その表をコピーして貼り付けると思うんですけど、横なり下なりに貼り付けると列や行の幅が元の設定に戻ってしまうので困っています。 職場ではエクセル2000、自宅は98ですが、両方とも同じ症状が出ます。 「形式を選択して貼り付け」というところで「列幅」を選択しても何も変化が起こりません。 使い方が悪いのだとは思うのですが、どうすればよいのでしょうか? 教えてくださいm(_ _)m

  • EXCElで特定の文字列の行をコピー

    下記のようなシートがあります。 列A~K 行1~80程度 列は変わることがありません。 行はデータ量によって40~80くらいまで変動します。 この中の特定の行をコピーして他のシートにペーストしたいのです。 コピーしたい行のK列は430という数字が入ります。 K列には430以外の数字も入ることがあります。 また、コピーしたい行の範囲は「開始」という文字列から「小計」 と言う文字列の間です。(小計の後の行にも430という数字が出てきます) マクロを使えば出来ると言うことは聞いたのですが、ヘルプを見ても よくわかりません。 わかる方いましたら是非ご教授下さい。

  • エクセルで、そのままコピーするには?

    エクセルのコピーに関する質問です。 ブックAとブックBがあって、 ブックBのシート1の内容を、罫線やセルの高さや幅などをそのままブックAのシート2にコピーしたいのです。 ブックAブックBのシート1は表があり、罫線や行列の高さ・幅が複雑に設定してあります。つまりこの行列の高さや幅を崩さずにコピーしたいのです。 Excel2002を使用しています。が、普通にコピー&貼り付けをすると、列や行の幅、高さがブックAのままで、ブックBのが反映されません。 どうすればいいのでしょうか?教えて下さい。宜しくお願いします。

  • 行の高さ、列の幅同時にコピー

    行番号をコピーして新しいシートに貼り付けると、列の幅が変わりません。同時に変えることってできますか?

  • エクセルのコピー(列幅行幅をそのままコピーしたい)

    同じシート内に、同じ表を作りたくて、貼り付け時に「すべて」を選んでも、列幅行幅が小さくなってしまいます。コピー元とまったく同じにしたいのですがどうすればいいでしょうか。

  • ワード表→エクセルへそのままコピー

    ワードで作った5列×20行の罫線入りの住所録があるんですが、 そのワードで作った表のページの余白設定、列の幅や文字指定、 文字フォントの大きさなどをまったくそのままでエクセルに貼 り付けることはできるでしょうか? ただコピーしてエクセルに貼り付けたら列の幅などが同じに 貼り付けられませんでした。。。 初心者質問で申し訳ありませんが、簡単な方法がありましたら おしえてください。

  • Excelで1つのセルに入れた複数行の長い文字列をセルの高さを変えずに表示したい

    こんにちは。 Excelについての質問です。 お分かりになる方がらっしゃいましたら教えていただけると幸いです。 Excelのシートに、何行かにわたる長い文字列をコピーしたものを 1つのセルに貼り付けて、全て表示させたいのです。 その時、シートの幅や高さは変えずに、 セル内で「Alt+Enter」で改行されてその高さに収まらない文字列は、 そのまま直下の空いているセルに表示させたいのですが、これは可能でしょうか。 「折り返して全体を表示する」はオフの状態です。 この設定で1行だけの文字列だと幅以上の文字列は自然に横の空白のセルに流れてくれますよね? これを、「Alt+Enter」の複数行ver.でやりたいのですが、 このようなことは可能なのでしょうか。 質問が分かりにくくて申し訳ありません。 他にも、いい方法をご存知でしたらアドバイスをお願いいたします。

  • VBA 100行ごとに列を変更してコピーする。

    Winは7、Excelは2013を使用しています。 A列とB列のデータを100行毎に列を変えてコピーしたいと思っています。 (画像参照願います。) それで、別シートにコピペするサンプルコードを見つけたのですが、 同シート内でする様に変更する知識がなく、苦戦しています。 申し訳ありませんが、ご教示願います。 別シートにコピペするサンプルコード Sub データを100行ごとに分割する() Dim シート As Worksheet, 元 As Worksheet '元は元データのあるシート Dim 総行数 As Long, 回数 As Long, i As Long, 開始行 As Long Const コピー行 = 100 Set 元 = ActiveSheet '変数の元をActiveSheetにセットする 総行数 = 元.UsedRange.Rows.Count 回数 = Int(総行数 / コピー行) + IIf(総行数 Mod コピー行 > 0, 1, 0) 開始行 = 1 For i = 1 To 回数 Set シート = Sheets.Add シート.Name = 開始行 & "~" & 開始行 + コピー行 - 1 元.Rows(開始行 & ":" & 開始行 + コピー行 - 1).Copy シート.Range("A1") Columns("A:F").AutoFit 開始行 = 開始行 + コピー行 Next i End Sub

専門家に質問してみよう