ログインしてさらにmixiを楽しもう

コメントを投稿して情報交換！
更新通知を受け取って、最新情報をゲット！

Excel VBA 製作所コミュの行をコピーして貼り付けたいんですが

ログインして参加する

  • mixiチェック
  • このエントリーをはてなブックマークに追加

行をコピーして貼り付けたいんですが

mixiユーザー 2007年02月15日 11:18

A列に日付を入れたら
その下の行をコピーして、又その下の行に貼り付け
という作業をしたいのですが、
たぶん下のコードだと、延々繰り返す様に思うんです。
一回限りにしたいときは、何を足せばよいのでしょうか？
宜しくお願いします。

Private Sub Worksheet_Change(ByVal Target As Range)
'' A列の入力かどうかを判断
If Target.Column = 1 Then
ActiveCell.Offset(1).EntireRow.Copy ActiveCell.Offset(2).EntireRow
End If
End Sub

コメント(4)

[4] mixiユーザー 02月16日 12:37

マルチポストに成るということで削除です
無知で申し訳ありませんでした。
解決です！

ログインすると、みんなのコメントがもっと見れるよ

mixiユーザー
ログインしてコメントしよう！

Excel VBA 製作所 更新情報

Excel VBA 製作所のメンバーはこんなコミュニティにも参加しています

星印の数は、共通して参加しているメンバーが多いほど増えます。

Excel VBA 製作所

人気コミュニティランキング

困ったときには

関連ワード

mixiで趣味の話をしよう
新規登録（無料）

このページの上部へ