![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
いつも大変お世話になっております。
下記のコードはListView の選択している行を
削除して他のシートへ貼り付けるというものです。
検索などしてつくりましたが、
ここで問題がでました。
1.シートの行の削除
2.ListViewの画面の更新
がわかりません。
わかる方おしえてくれませんでしょうか
Dim i As Long
Dim R As Range
For i = 1 To ListView1.ListItems.Count
If ListView1.ListItems(i).Selected = True Then
LastRow = Sheet1.Cells(Rows.Count, 1).End(xlUp).Row + 1
Set ListItem = ListView1.ListItems(i)
With ListView1.ListItems.Add
.Text = ListItem.Text
For j = 1 To ListView1.ColumnHeaders.Count - 1
.SubItems(j) = ListItem.SubItems(j)
Sheet1.Cells(LastRow, j) = ListView1.ListItems(i).SubItems(j)
Next
End With
ListView1.ListItems.Remove i
End If
Next
よろしくお願いいたします。
![「ListViewの画面の更新」の質問画像](http://oshiete.xgoo.jp/_/bucket/oshietegoo/images/media/3/543044465_5ffd94c7d0092/M.gif)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ListView重複データ削除 2 2022/08/05 18:12
- Visual Basic(VBA) 【VBA】特定のワードが入っている行全体を塗りつぶしたい 4 2022/04/20 15:22
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) コード名シートA列と集計シートA列のコードが一致したら、コード名シートA5からk12の範囲をコピーし 1 2022/08/29 23:46
- Visual Basic(VBA) ワークシート内を検索 1 2022/12/19 23:46
- Visual Basic(VBA) VBAコードが作動せず、どこに問題があるのか教えて下さい。 3 2023/06/13 13:20
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Visual Basic(VBA) VBAで質問ですが、皆さんはどの様に導き出しているのでしょうか? 6 2022/05/03 21:53
- Visual Basic(VBA) 【VBA】ボタンに登録したマクロがエラーになる 4 2022/07/25 17:47
- Visual Basic(VBA) 抽出結果を別シートに貼り付ける 2 2022/07/09 22:59
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
ListView 項目の選択/選択解除について
Visual Basic(VBA)
-
vba Listviewでのチェックボックスのイベントを教えてください
Excel(エクセル)
-
Excel VBA ListViewサブアイテムの文字色
その他(プログラミング・Web制作)
-
-
4
ListViewで複数選択された項目を一度に削除する方法
Visual Basic(VBA)
-
5
リストビューの項目の内容を変更する方法は?
Visual Basic(VBA)
-
6
ListViewから選択中の文字列を取得
Visual Basic(VBA)
-
7
vba ListViewの選択色について教えてください
Excel(エクセル)
-
8
リストビューをスクロールさせるには
Visual Basic(VBA)
-
9
Listviewのデータを上から順番に取得 VBA
Visual Basic(VBA)
-
10
ListViewの行選択について
Visual Basic(VBA)
-
11
VBAでListViewのフォントを変更する方法
Visual Basic(VBA)
-
12
vba listviewにおけるtextのAlingmentを中央にしたい
Excel(エクセル)
-
13
特定行の背景色を変えたいのですが
Visual Basic(VBA)
-
14
ListViewのチェックボックスについて
Excel(エクセル)
-
15
Vba ListViewの行挿入に関して教えてください
Visual Basic(VBA)
-
16
VBA ListViewの選択Itemを削除する
Excel(エクセル)
-
17
ListViewで列を指定して表示させる方法
Excel(エクセル)
-
18
ListViewで、非表示列って作れますか?
Visual Basic(VBA)
-
19
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
20
excel VBA リストビューの行の変更
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
別のシートから値を取得するとき
-
ユーザーフォームに入力したデ...
-
ブック名、シート名を他のモジ...
-
VBA 検索して一致したセル...
-
VBAで同じシート名のコピー時は...
-
エクセルのシート名変更で重複...
-
同じ作業を複数のシートに実行...
-
実行時エラー'1004': WorkSheet...
-
特定の文字を含むシートだけマ...
-
excelのマクロで該当処理できな...
-
【Excel VBA】Worksheets().Act...
-
XL:BeforeDoubleClickが動かない
-
Excelマクロのエラーを解決した...
-
VBA 入力月で該当シートを選択...
-
VBA 最終行まで数式をコピーする
-
【VBA】特定の文字で改行(次の...
-
VBA 存在しないシートを選...
-
シートが保護されている状態で...
-
Excel VBA 複数行を数の分だけ...
-
エクセル・マクロ シートの非...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
別のシートから値を取得するとき
-
excelのマクロで該当処理できな...
-
【ExcelVBA】全シートのセルの...
-
ユーザーフォームに入力したデ...
-
同じ作業を複数のシートに実行...
-
ブック名、シート名を他のモジ...
-
特定の文字を含むシートだけマ...
-
実行時エラー'1004': WorkSheet...
-
VBA 存在しないシートを選...
-
エクセルのシート名変更で重複...
-
XL:BeforeDoubleClickが動かない
-
シートが保護されている状態で...
-
Excel VBA 複数行を数の分だけ...
-
実行時エラー1004「Select メソ...
-
【Excel VBA】Worksheets().Act...
-
Excelマクロのエラーを解決した...
-
エクセル・マクロ シートの非...
-
VBAで同じシート名のコピー時は...
-
ExcelのVBAのマクロで他のシー...
-
【VBA】色のついたシート名を取得
おすすめ情報
やってみましたが
わかりませんです。
おねがいします。