Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
30307 / 76738 ←次へ　｜　前へ→
【51698】Re:マクロを一部とばして実行するのですが
質問  初心者かめさん  - 07/10/1(月) 13:41 -
引用なし
パスワード
   じゅんじゅんさんこんな感じなんですけれど。
いかがなものでしょうか

　　Dim strRange As String
　　Dim strFormula As String
　　strRange = "f" & n + 1
　　strFormula = "=SUM(d" & n & ":d" & n + 1 & ")"
　　Range(strRange).Formula = strFormula
⇒　Range(Cells(n + 1, "f"), Cells(n + 1, "f")).Select
　　Selection.Copy
　　Range(Cells(n + 1, "J"), Cells(n + 1, "J")).Select
　　Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
　　SkipBlanks _
　　　　:=False, Transpose:=False
　　Range(Cells(n + 1, "J"), Cells(n + 1, "J")).Select
　　Selection.ClearContents
　　Range(Cells(n + 1, "f"), Cells(n + 1, "f")).Select
⇒　Selection.Copy
　　n = n + 1
　　比較

⇒の部分を実行してくれないのです。
0 hits
▼ 【51696】マクロを一部とばして実行するのですが 初心者かめさん 07/10/1(月) 13:20 質問
【51697】Re:マクロを一部とばして実行するのですが じゅんじゅん 07/10/1(月) 13:32 発言
【51698】Re:マクロを一部とばして実行するのですが 初心者かめさん 07/10/1(月) 13:41 質問≪
【51699】Re:マクロを一部とばして実行するのですが 初心者かめさん 07/10/1(月) 13:43 質問
【51701】Re:マクロを一部とばして実行するのですが じゅんじゅん 07/10/1(月) 13:55 発言
【51703】Re:マクロを一部とばして実行するのですが 初心者かめさん 07/10/1(月) 14:09 お礼
【51702】Re:マクロを一部とばして実行するのですが じゅんじゅん 07/10/1(月) 14:02 発言
【51704】Re:マクロを一部とばして実行するのですが 初心者かめさん 07/10/1(月) 14:16 質問
【51705】Re:マクロを一部とばして実行するのですが じゅんじゅん 07/10/1(月) 14:34 発言
【51708】Re:マクロを一部とばして実行するのですが 初心者かめさん 07/10/1(月) 14:40 お礼
【51709】Re:マクロを一部とばして実行するのですが じゅんじゅん 07/10/1(月) 14:44 発言
【51710】Re:マクロを一部とばして実行するのですが 初心者かめさん 07/10/1(月) 14:52 質問
【51711】Re:マクロを一部とばして実行するのですが じゅんじゅん 07/10/1(月) 15:01 発言
【51714】Re:マクロを一部とばして実行するのですが 初心者かめさん 07/10/1(月) 16:21 質問
【51715】Re:マクロを一部とばして実行するのですが じゅんじゅん 07/10/1(月) 16:35 発言
【51716】Re:マクロを一部とばして実行するのですが 初心者かめさん 07/10/1(月) 16:48 お礼
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
30307 / 76738 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free