No.4ベストアンサー
- 回答日時:
#3です。
それらしきものをVBAで作ってみました。
シートにコマンドボタンを1つ貼り付け。
そのクリックイベントに
Private Sub CommandButton1_Click()
d = Range("A65536").End(xlUp).Row
For i = d To 1 Step -1
If Intersect(Worksheets("Sheet1").Range("A" & i & ":Z" & i), selection) Is Nothing Then
Rows(i).EntireRow.Delete
Else
End If
Next i
End Sub
ーー
A列で最終行を判断しています。
利用操作
どの列でもよいからA-Z列の範囲内で残す行のセルを1列以上の範囲内で範囲指定する。
そしてボタンをクリック
(安易指定した以外の行が削除される)
注意
範囲指定してないで実行するとすべてデータが消える危険性アリ。
そういうことで使いずらいが、良い方法はなさそう。
回答ありがとうございました!
VBAじたいよく分かってないんで、ちょっと無理そうです(> <)
せっかく作っていただいたのにスイマセンM(_ _)M
でも参考になりました!!
No.6
- 回答日時:
Webからの注文メールから売上、出荷までの処理でしょうか?
ちなみに近い内容をエクセルで行っています。
1、Web上から注文のメールが送信される。
2、エクセル(BASP21使用して)でメールデータを受信
3、VBAにて出荷データ(ヤマト運輸データ、納品書データ)に変更して物流部門へ転送
4、物流部門で納品書、送り状が印刷され出荷
一連の作業がエクセルで可能です。
VBAの知識が必要です。
No.5
- 回答日時:
はじめまして w-booking さん
眠いですね、気がつけばもう2時なんて・・
まぁそんなことはさておき以下を回答とします。
Sub test()
'行を事前に選択しているものとする(例ではしかたないので選択している)
Rows("2:3").Select '使う場合は削除する(仮に2~3列を選択していた場合
Application.DisplayAlerts = False: mysheetname = ActiveSheet.Name: dummyname = "Dummy": Sheets.Add(After:=ActiveSheet).Name = dummyname: Sheets(mysheetname).Select: Selection.Copy: Sheets(dummyname).Select: Rows("1:1").Select: Selection.Insert Shift:=xlDown: Sheets(mysheetname).Select: Application.CutCopyMode = False: ActiveWindow.SelectedSheets.Delete: Sheets(dummyname).Select: Sheets(dummyname).Name = mysheetname: Application.DisplayAlerts = True
End Sub
問題は列ではなく行でしたよね?
アクティブシート名を保持(元シート)、ダミーシート展開、元シート選択、選択されている行コピー、ダミーシート選択、A1選択、下にシフトしながら選択されていた行貼り付け、元シート選択、コピー状態解除、元シート削除、ダミーシートを元シート名にリネーム。
で何事もなかったかのように選択されている行以外が削除されたといえるかと思います。
結局1番さんの答えはこうなるのかな?
追加処理・処理違い・補足等あればいってください。
また、仮に私の回答により解決した場合、私にポイントを絶対振らないでください。
No.3
- 回答日時:
そういった機能はありません。
既に出ているご回答の方法か、
VBAで、シートにボタンをつくり、そのクリックイベントに
選択した行かどうか判別し、でなければ削除するプログラムをくむ。
No.1
- 回答日時:
>選択した行以外の行を削除したいのですが、そういった機能はありますでしょうか。
そういった機能は??
選択した行を別の新しいシートに貼り付けるではダメなのでしょうか。
回答ありがとうございます。
使い方として
ネットショップから注文情報をCSV形式に書き出し
↓
不要な行の削除(ここで必要)
↓
エクセル形式で保存
↓
送り状発行ソフトでエクセルデータの読み込みを考えております。
上記毎日の作業なので、1手でも少ない動きで業務を行えないかと
ご相談させていただきました。
しかし希望の機能はないとのことですので、結局はNO,1さんの回答が一番現実的かなと思います。
ご回答ありがとうございました!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルの使い方について 2 2023/02/07 20:54
- メルカリ メルカリに関しての質問です。 登録したお支払い用銀行口座を削除したいのですが、できません。 「支払い 1 2022/11/22 10:25
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/07/07 08:37
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/06 17:46
- その他(Microsoft Office) ワードのマクロについて教えてください。 1 2023/01/22 11:43
- Excel(エクセル) エクセルVBA 複数行にまたがっている選択を判定するには 2 2023/05/21 21:54
- Excel(エクセル) Excel 指定した固有番号で、複数の行を削除する方法は? 2 2022/03/30 15:18
- Windows 10 プリンターを削除したい 4 2022/10/19 16:52
- Excel(エクセル) エクセルで重複データを行ごとに抽出したい 4 2022/12/05 08:18
- Illustrator(イラストレーター) Illustrator アンカーポイント選択について 3 2023/01/30 12:31
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
エクセルの選択範囲以外を削除する方法
Excel(エクセル)
-
エクセル 特定のセルを残して一括削除
Excel(エクセル)
-
エクセル 印刷範囲外を非表示にしたいのですが・・・
Excel(エクセル)
-
-
4
エクセルで印刷範囲以外を灰色(セルなし)にしたいんですが・・・
その他(コンピューター・テクノロジー)
-
5
エクセルである行以下全部を削除する方法
Excel(エクセル)
-
6
excelで選択範囲の反転をしたいのですが
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで別シートの同じ位置...
-
エクセルの下部のシートタブの...
-
EXCELでコピーしたグラフのデー...
-
シート全体を他のブックのシー...
-
エクセルでセルの書式設定がで...
-
ワークシートの行が途中から表...
-
Excelで大量の2000個のリストを...
-
Excelで保護のかかったシートの...
-
excelで勝手にテキストボックス...
-
ロックしたセルのコピー&貼り付け
-
エクセルで数式は残したまま他...
-
【エクセル】数式のセル番地を...
-
エクセルで打ち込んだ数字を自...
-
エクセルVBA シートの保護につ...
-
Excelセルの書式設定ができない
-
VBA アクティブでないシートの...
-
【エクセル】表から条件に合っ...
-
wordからexcelへ一部のデータを...
-
セルに背景色がある行を別シー...
-
EXCELで複数シート作成後、全シ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで別シートの同じ位置...
-
エクセルの下部のシートタブの...
-
エクセルでセルの書式設定がで...
-
EXCELでコピーしたグラフのデー...
-
シート全体を他のブックのシー...
-
ワークシートの行が途中から表...
-
ロックしたセルのコピー&貼り付け
-
エクセルで数式は残したまま他...
-
Excelで保護のかかったシートの...
-
Excelで大量の2000個のリストを...
-
excelで勝手にテキストボックス...
-
VBA アクティブでないシートの...
-
行の挿入ができなくなった
-
シート保護したExcelへの画像貼...
-
【エクセル】数式のセル番地を...
-
エクセルで多数のシートをまと...
-
シート保護してても並び替えを...
-
【エクセル】表から条件に合っ...
-
worksheetクラスのcopyメソッド...
-
エクセルで打ち込んだ数字を自...
おすすめ情報