A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
質問の内容だけでは具体的にどのようにしたいのかがよくわかりません。
「作成済の表と同様の計算式などを最終行から1行空けて次行に追加したい」という事だと解釈すると方法としては
1.最終行の行番号を取得する。
2.B39からU48までをセルをコピーする。
3.最終行から1行空けたの次の行からコピーしたセル内容を複写する。
と言う方法で解決しませんか?
入力されている最終行の行番号を取得するにはSpecialCells(xlCellTypeLastCell)メソッドで値が入力されている最後のセルを選択して、その行番号を見つければいいかと思います。
最終行の行番号を取得するVBAとして参考までに
Dim myLastCell As Range
Dim r As Long
myLastCell = Range("A1").SpecialCells(xlCellTypeLastCell)
r = myLastCell.Row
ただし一度入力してデータ削除したセルがその表より下の行にあるとSpecialCells(xlCellTypeLastCell)メソッドではそこを指してしまうので、その場合の回避処理が必要になります。
その行の表内で本来値が入力されているはずの列の値が""であれば、Findメソッドなどを使って1行上を指し示すような処理を追加する必要があるかと思います。
そのあたりはご自身で勉強してみてください。
No.1
- 回答日時:
どこからコピーしてどこに貼り付けますか?1行おきとはコピーするのが?貼り付けるのが?うまく行かないのはどの動きでしょうか?作成した表がずれると言うのはどういった現象でしょうか?
うまく動かない部分のVBAを公表することは出来ませんか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのマクロでコピー後の貼り付け先を毎回指定したところにしたい 5 2022/08/12 10:47
- Excel(エクセル) Excelの複数ファイルの複数行を別ファイル1つのシートにVBA、マクロで集約する方法 5 2022/09/13 06:30
- Excel(エクセル) Excel フィルタ後のコピー貼付けと可視セルの関係について 3 2023/02/07 16:42
- Excel(エクセル) 【マクロ】同じフォルダ内にある複数ブックから1つのブック内の1シートにデータを集めたい 6 2022/09/28 18:16
- Excel(エクセル) エクセルの表示形式について教えてください あるセルの「A」という値と、別のセルの「B」という値を組み 4 2023/02/21 21:55
- Excel(エクセル) シートが違う2枚のエクセルシートにある数値を別シートにコピーしたい(VBA?) 8 2022/03/31 12:24
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- Visual Basic(VBA) 改行ごとに行を追加し、数量を分割 4 2023/07/11 16:39
- Visual Basic(VBA) 【ExcelVBA】動的にボタン、ボタン名を生成できますか? 7 2022/04/08 12:54
- Windows 10 エクセルの罫線がパワポに貼り付けると見えなくなる。 3 2022/12/27 15:23
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ExcelVBAを使って、値...
-
Excelで指定した日付から過去の...
-
特定のセルが空白だったら、そ...
-
VBAでセルをクリックする回...
-
【Excel VBA】指定行以降をクリ...
-
VBからEXCELのセルの値を取得す...
-
i=cells(Rows.Count, 1)とi=cel...
-
特定の文字を条件に行挿入とそ...
-
TODAY()で設定したセルの日付...
-
【Excel】指定したセルの名前で...
-
Excel VBA、 別ブックの最終行...
-
VBAの計算で@が出てしまう件
-
DataGridViewのセル編集完了後...
-
Excelのプルダウンで2列分の情...
-
Excel ユーザーフォームをモー...
-
EXCELのVBA-フィルタ抽出後の...
-
VB6のDataGridコントロールが良...
-
”戻り値”が変化したときに、マ...
-
Sub 要具ライフ() ActiveSheet....
-
RC表示に変数を入れる
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ExcelVBAを使って、値...
-
特定のセルが空白だったら、そ...
-
【Excel VBA】指定行以降をクリ...
-
i=cells(Rows.Count, 1)とi=cel...
-
【Excel】指定したセルの名前で...
-
Excelで指定した日付から過去の...
-
特定の文字を条件に行挿入とそ...
-
Excel VBA、 別ブックの最終行...
-
EXCELで変数をペーストしたい
-
Excelのプルダウンで2列分の情...
-
Excel vbaで特定の文字以外が入...
-
TODAY()で設定したセルの日付...
-
screenupdatingが機能しなくて...
-
DataGridViewの各セル幅を自由...
-
Sub 要具ライフ() ActiveSheet....
-
【EXCEL VBA】Range("A:A").Fi...
-
VBAを使用した時間管理
-
VBAでセルをクリックする回...
-
セル色なしの行一括削除
-
エクセルVBAでコピーして順...
おすすめ情報