今使用しているEXCELは365ですがEXCEL2010でも使用したいと思ってます
マクロは現状
Dim myRng As Range, myFileName As String
Set myRng = Range("G:G,H:H,I:I")
Application.CutCopyMode = False
If myRng Is Nothing Then Exit Sub
myFileName = Application.GetSaveAsFilename(FileFilter:="CSVファイル (*.csv,*.csv")
If myFileName = "False" Then Exit Sub
Application.ScreenUpdating = False
With Worksheets.Add
myRng.Copy .Cells(1, 1)
.Move
End With
With ActiveWorkbook
.SaveAs Filename:=myFileName, FileFormat:=xlCSV
.Close False
End With
Application.ScreenUpdating = True
Set myRng = Nothing
End Sub
としています。
ただこれだとファイルを閉じる時に『図が大きすぎます。入りきらない部分は切り捨てられます。』と出てしまいます。
なのでクリップボードのクリアをするマクロを追加したいのですがどうすればクリップボードはクリアされるのでしょうか?
マクロの『Application.CutCopyMode = False』を入れてもクリアされていないみたいです。
『Application.CutCopyMode = False』の入れるところが間違っているのかそもそもマクロが間違っているのかもわからないです。
回答よろしくお願いいたします。
No.1ベストアンサー
- 回答日時:
こんにちは!
単純に
>Application.ScreenUpdating = False
を
貼り付け後の
>myRng.Copy .Cells(1, 1)
の次の行に移動したらどうなりますか?
※ 未検証なのでダメだったらごめんなさい。m(_ _)m
回答ありがとうございました。
やってみましたがエラーは解消されませんでした。m(_ _)m
自分でも色々と調べてみましたら
myRng.Copy .Cells(1, 1)を
myRng.Copy
.Cells(1, 1).PasteSpecial Paste:=xlPasteValues
に変更してみたら『図が大きすぎます。入りきらない部分は切り捨てられます。』は
出なくなりました。
お騒がせしてすいませんでした。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) excel2021で実行できないマクロ。どこを直したらいいのか 2 2022/03/28 03:40
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) ExcelVBAで、index、match関数を使用して、指定範囲に出力したい 3 2022/10/18 21:53
- Excel(エクセル) フォルダ内のワードファイルをPDFに一括変換するVBA 3 2023/06/09 16:51
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Excel(エクセル) Excelのマクロコードについて教えてください。 1 2022/03/27 10:47
- Visual Basic(VBA) 【追加】ファイルを閉じてダイアログで保存した時だけ処理の実行をする 3 2022/03/23 15:43
- Visual Basic(VBA) Excel VBAの解読について質問があります。 概要は、マクロでチェックボックスにチェックすると日 1 2023/02/10 07:50
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
エクセル2010、図が大きすぎますとメッセージが
Excel(エクセル)
-
図が大きすぎます。入りきらない部分は・・・
Excel(エクセル)
-
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
-
4
エクセルVBAでクリップボード内容をクリア
その他(プログラミング・Web制作)
-
5
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
6
EXCEL2013 図が大きすぎ・・メッセージ
Excel(エクセル)
-
7
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
8
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
9
「Columns(A:C")」の列文字を数字にして表記したい"
Excel(エクセル)
-
10
Rangeメソッドは失敗しました。globalオブジェクトについて
Excel(エクセル)
-
11
VBA シートをコピーする際に Copyメソッドは失敗しましたのエラーが出てしまいます
Visual Basic(VBA)
-
12
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
13
EXCELで特定のセルに表示された項目をヘッダーやフッターに出力するには
Excel(エクセル)
-
14
「アイテムは収集されました」と表示させない方法
Excel(エクセル)
-
15
Excel マクロ VBA プロシージャが大きすぎます のエラー対処方法
Visual Basic(VBA)
-
16
アクセス マクロ クリップボードを空っぽにしたい
Access(アクセス)
-
17
「選択範囲を解除してアクティブセルを選択」をマクロで行うにはどうすればよいでしょうか
Excel(エクセル)
-
18
メッセージボックスに表示する文字を大きくしたい
Excel(エクセル)
-
19
VBAでファイルを開くときにファイル名でワイルドカードを使用したいです
その他(プログラミング・Web制作)
-
20
vba フィルター 複数条件 3つ以上 完全一致除外
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル終了時の保存確認メッ...
-
VBAを一度起動するとずっと出て...
-
別のパソコンでエクセルのマク...
-
コピーしたファイルのマクロを...
-
アクセスでファイルを開いたと...
-
エクセルの単票を一覧表に
-
excelファイルに使われているVB...
-
excelのマクロ実行でブロックさ...
-
マクロが使えるExcelViewer
-
VBA マクロ実行時エラー’1004Ra...
-
EXCEL マクロ クリップボードク...
-
エクセルマクロにてパワーポイ...
-
エクセル2013vbaで、見えない名...
-
マクロを実行するとパス名が無...
-
秀丸で保存時のフォルダを固定...
-
マクロを消すマクロは不可能?
-
Excelが勝手にシート移動してし...
-
エクセルファイルを自身のファ...
-
「開いているすべてのブック」...
-
Powerpoint 2003 でのVBA UserF...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセル終了時の保存確認メッ...
-
VBA マクロ実行時エラー’1004Ra...
-
VBAを一度起動するとずっと出て...
-
別のパソコンでエクセルのマク...
-
コピーしたファイルのマクロを...
-
マクロを消すマクロは不可能?
-
昨日まで動いていたエクセルの...
-
エクセルファイルを自身のファ...
-
エクセル2013vbaで、見えない名...
-
Excelマクロ ファイル名が変わ...
-
エクセルマクロ実行中に別ファ...
-
excelファイルに使われているVB...
-
Excelが勝手にシート移動してし...
-
Word用のマクロが急に働かなく...
-
EXCEL マクロ クリップボードク...
-
【マクロ】エラーが発生⇒実行時...
-
excelが別プロセスで起動してし...
-
エクセルマクロを有効にしない...
-
アクセスでファイルを開いたと...
-
excelでpersonal.xlsを常に開く...
おすすめ情報