![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
配列のペースト出力結果の書式について、どうも書式が反映されなくて困っております。
dim AllmydataArr as Variant
dim SourceRng as range, TargetRng as range
wbとmbは それぞれのBookのパス先です
Set SourceRng = Wb.Worksheets("sheet5").UsedRange
AllmydataArr = SourceRng
Set TargetRng = mb.Worksheets("sheet1").Range("A1")
TargetRng.Resize(UBound(AllmydataArr, 1), UBound(AllmydataArr, 2)) = AllmydataArr
と現在このようにResizeとUBoundをつかって配列AllmydataArrのペースト出力結果を出しております。
このままでは値貼り付けで終わってしまい、書式の移動ができておりません。
NumberFormat を使おうにもエラーがでてしまいます。
どのようにVBAを表現すると元のSheetにある書式が反映されるようになるのでしょうか。
教えていただけると幸いです。よろしくお願いいたします
No.3ベストアンサー
- 回答日時:
No2です。
回答の意味が全く伝わってないみたいですね。
https://learn.microsoft.com/ja-jp/office/vba/api …
もしも、書式の一部だけを反映したいのであれば、その部分だけをコピーしなければならなくなります。
あるいは、一旦全部をコピーしておいてから、不要な書式を削除するか。
コピー元に数式等が設定されていて、値を反映できない場合や式を削除したければ
Range2.Value = Range1.Value
形式で再度値を転記すれば済みます。
>先方から~~~
依頼を受けて作成しているのならお仕事なのでしょうから、当然、VBAのわかる方がいると思いますので、その方にこのページを見せれば意味を解説してくれるでしょう。
No.2
- 回答日時:
No1です。
>先方から1回のボタン操作で4回分が自動で済むように言われているので、
>普通のコピペではダメなようです。
意味不明です。
コードを1センテンスにしろとかいう話ではないんでしょ?
そもそも、ご提示のコード自体が1回分の「値のペースト」処理でしかないですし、1センテンスでもないですし・・
4回分行う必要があるのなら、4回コピペすれば済む話だと思いますけれど・・?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセル 値をコピペした時に、条件付き書式で塗られた背景色もペーストさせる 2 2023/04/05 17:21
- Visual Basic(VBA) Excel VBA マクロ あるフォルダー内の複数のファイルを統合したいです 1 2024/02/19 21:37
- Excel(エクセル) 3つのマクロを連続実行の中で、1つ目のマクロ要件を満たさなかったら、マクロ2・3を実行しない為には 1 2023/10/15 13:42
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Visual Basic(VBA) クリップボードに貼付している文字列が、マクロで別ブックへ転記すると、消えてしまう 1 2023/10/15 13:36
- Visual Basic(VBA) Excel VBA マクロ シート名を変えずにA列にあるセル名の名前でファイルの分割をしたいです 3 2024/02/05 22:10
- Visual Basic(VBA) VBAに関して 2 2023/11/09 20:57
- Visual Basic(VBA) 抽出結果を別シートに貼り付ける 2 2022/07/09 22:59
- Excel(エクセル) 日付で矢印マクロ 4 2023/07/25 16:47
- Visual Basic(VBA) chatGPTで質問してみた エクセルのVBAについて 2 2023/10/24 07:37
このQ&Aを見た人はこんなQ&Aも見ています
-
賃貸で可能な古民家風レトロな部屋作りのコツ!改めて知る畳の高い機能性と魅力も紹介
畳の部屋を雰囲気のよい部屋に仕上げたい!賃貸住宅でもできる古民家風のレトロな部屋作りのコツを伺った。
-
VBAの質問です、複数のテキストボックスに同じコメントを
Visual Basic(VBA)
-
ExcelVBAのFindFirstエラーについて
Visual Basic(VBA)
-
for 文の 繰り返し処理に使えるのかどうかについて
Visual Basic(VBA)
-
-
4
ExcelのVBAのことで質問です。 以下のコードを入れ、ボタンを押せば作動させると写真のように画面
Visual Basic(VBA)
-
5
コードを直していただきたいです。 以下のコードはネットで拾ったものをほんの少しいじった物なのですが、
Visual Basic(VBA)
-
6
エクセルvbaについて
Visual Basic(VBA)
-
7
VBAのコードを教えてください
Visual Basic(VBA)
-
8
エクセルVBAの配列について
Visual Basic(VBA)
-
9
VBA UserFormからの転記で
Visual Basic(VBA)
-
10
VBAのコードを教えてください
Visual Basic(VBA)
-
11
VBAに関して
Visual Basic(VBA)
-
12
VBA 二つのブックをうまく扱えないでいます
Visual Basic(VBA)
-
13
excelのVBAについて、以下のコードに追加をお願いいたします。
Visual Basic(VBA)
-
14
VBAコードが作動しません。修正したいのですが何処に原因かあるか教えて下さい。
Visual Basic(VBA)
-
15
Cellsのコードが打てません
Visual Basic(VBA)
-
16
マクロのエラー
Visual Basic(VBA)
-
17
近似した文字列を置換するエクセル関数またはVBAについて
Visual Basic(VBA)
-
18
Excel VBA マクロ シート名を変えずにA列にあるセル名の名前でファイルの分割をしたいです
Visual Basic(VBA)
-
19
引数に数値、文字列の混在
Visual Basic(VBA)
-
20
VBA 別ブックから条件に合うものを転記したいです
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA 変数名に変数を使用したい。
-
C#でbyte配列から画像を表示さ...
-
コンボボックスのインデックス...
-
Segmentation Fault (メモリ制限?)
-
エクセル(VBA)の空白配列の削除...
-
vba フィルター 複数条件 3つ以...
-
順位をつける VB.NET2008
-
2次元配列の初期値
-
配列の中の最大値とそのインデ...
-
Dir関数で読み取り順を操作でき...
-
Excel2010のinputboxで複数デー...
-
CheckBoxの配列化
-
Redim とEraseの違いは?
-
1ビットごとの配列を作りたい
-
定数配列の書き方
-
mpiによる多次元配列の送受信
-
レコードセットの中身を配列に...
-
EXCELで年齢別の分布表を...
-
ポーカーを作りたいのですが・・・
-
ReDim PreserveよりもReDimが遅い
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA 変数名に変数を使用したい。
-
C#でbyte配列から画像を表示さ...
-
vba フィルター 複数条件 3つ以...
-
Dir関数で読み取り順を操作でき...
-
エクセルでXY座標に並べられた...
-
配列の中の最大値とそのインデ...
-
VB.NETの配列にExcelから読み込...
-
定数配列の書き方
-
Excel2010のinputboxで複数デー...
-
大量の変数を定義するにはどう...
-
構造体配列の特定のメンバーをF...
-
構造体配列内の文字列検索のよ...
-
Redim とEraseの違いは?
-
Segmentation Fault (メモリ制限?)
-
OutOfMemoryExceptionの回避策...
-
VBAでMODE関数をつくる
-
COBOLの基本的な事なので...
-
Excelのメモリ(配列)の上限は2G...
-
コンボボックスのインデックス...
-
VB6のメモリ解放に関して
おすすめ情報
普通のシートのコピーでいいのでは?とも伺いましたが難色を示されましたのでこれを作っております。すいません。