Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


69918 / 76733 ←次へ | 前へ→

【11328】Re:オートフィルターで項目別にシートに...
回答  Jaka  - 04/3/5(金) 14:18 -

引用なし
パスワード
   ▼みかん さん:
>>Sheets(Cel.Value).Range("A2").PasteSpecial
>でいきなりエラーがでて進みません。
>「追加したシートを全部選ぶ」というコードは
>いれなくてもだいじょぶなんですか?
>ピントが外れた質問だったらごめんなさい。

これは、
Sheets(Cel.Value).Range("A2").PasteSpecial  
Sheets(Cel.Value).Range("A1").Select
Sheets(Cel.Value).Cells.EntireColumn.AutoFit  '追加
Sheets(Cel.Value).Cells.EntireRow.AutoFit   '追加


[#11305]のコードの

     Sheets(Cel.Value).Range("A2").PasteSpecial
     Sheets(Cel.Value).Range("A1").Select
  この間に追加するといった意味だったんですけど..。
     AcSh.Range("A" & Rend).AutoFilter

3 hits

【11282】オートフィルターで項目別にシートに保存 みかん 04/3/4(木) 16:49 質問
【11284】Re:オートフィルターで項目別にシートに保存 IROC 04/3/4(木) 17:07 回答
【11288】Re:オートフィルターで項目別にシートに... みかん 04/3/4(木) 17:19 発言
【11290】Re:オートフィルターで項目別にシートに... IROC 04/3/4(木) 17:33 回答
【11303】Re:オートフィルターで項目別にシートに... みかん 04/3/5(金) 9:05 発言
【11305】Re:オートフィルターで項目別にシートに... Jaka 04/3/5(金) 9:10 回答
【11307】Re:オートフィルターで項目別にシートに... みかん 04/3/5(金) 9:45 質問
【11308】Re:オートフィルターで項目別にシートに... IROC 04/3/5(金) 9:51 回答
【11317】Re:オートフィルターで項目別にシートに... みかん 04/3/5(金) 12:15 質問
【11318】Re:オートフィルターで項目別にシートに... みかん 04/3/5(金) 12:17 発言
【11321】Re:オートフィルターで項目別にシートに... Jaka 04/3/5(金) 12:54 回答
【11327】Re:オートフィルターで項目別にシートに... みかん 04/3/5(金) 13:58 質問
【11328】Re:オートフィルターで項目別にシートに... Jaka 04/3/5(金) 14:18 回答
【11335】Re:オートフィルターで項目別にシートに... みかん 04/3/5(金) 15:04 お礼

69918 / 76733 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free