No.2ベストアンサー
- 回答日時:
クリップボードデータの貼付けと言う事でしょうか?
それでしたら以下のような感じではいかがでしょうか?
--------------------------------------------------------------------------------
Sub クリップボードデータ貼付け()
Dim クリップボード As New DataObject
クリップボード.GetFromClipboard
Range("E8").Value = クリップボード.GetText
End Sub
--------------------------------------------------------------------------------
※ 事前に「Microsoft Forms 2.0 Object Library」を参照設定しておいてください。(参照設定の方法が判らなければ、ブックに「UserForm」を挿入して下さい。自動で参照設定されます。もちろんすぐ「UserForm」を削除してもかまいません)
GooUserラック様
夜間にも関わらず、早急に回答いただきありがとうございます。
こちらの内容で実現可能となようです。
後ほど組み込んで確認いたします。
丁寧にご説明いただきありがとうございます。
No.3
- 回答日時:
こんにちは。
>VBAでWebスクレイピングした結果を、Excelに貼り付けようとしています。
一例を書いて差し上げてもよいのですが、Webスクレイピングでは、そのような操作はないはずですが……。どちらかというと、IE の ExecWb コマンドのようです。
[Ctl+A]-[Ctl+C]
ご質問の内容は、私にはかなり難しいものだと思いました。
ああしたらよい、こうしたらよいとは思うものの、かなりの難問です。
全画面をシートに貼り付ける前に、クリップボードの情報を結合するとなると、一旦、テキスト化して、そのテキストを正規表現検索で改行コードを書き換えて、再び、テキストバッファからクリップボードに戻すか、そのまま貼り付けなくてはなりません。そういうコードを書くことは可能ですが、全体のコードが見えていないままでは、それは提示しにくいのです。
貼り付けられたものを、加工するスタイルではいけないのでしょうか。
これは、一旦貼り付けた後に、マージ(結合)するということです。
'//
Sub TestHeightMerging()
Dim c As Range
Dim Rng As Range
If TypeName(Selection) = "Range" Then
Set Rng = Selection.Cells
If Rng.Count > 1 Then
For Each c In Rng
If c.Value <> "" Then
buf = buf & vbLf & c.Value
End If
Next
End If
End If
Rng.ClearContents
Rng.Cells(1).VerticalAlignment = xlTop
Rng.Cells(1).Value = Mid(buf, 2)
End Sub
これを、ショートカットにすれば、良いと思います。
そうでなければ、最初のWebスクレイピング(クローリング)を、書き換えたほうが速いと思います。なぜなら、Webデータの innerHTML/outerHTMLには、もともと区分けのコードが書いてあるのですから。
WindFaller様
VBAもHTMLもあまり知識が無いもので、要領を得ず申し訳ないです。
Webで検索した結果から条件に一致したものを書き出したいのですが、
50件くらいを目視で実施すると時間がかかってしまい、自動化できないかと検討しています。
私の考えは、1個検索した結果を1セルに貼り付けて、
それを50回繰り返そうというものでした。(取り合えず全部コピーして、情報収集は後から考える。)
GetFromClipboardで1セルに入力する事は出来ました。
ですが、コピー元が何文字かもわからないので、
直接1セルに貼り付けるのは問題があるかと後から気付きました。
普通にExcelに貼り付けて、必要な情報だけコピーする事を繰り返す方が効率的だと気付けました。
マージ(結合)について参考にさせていただきます。
丁寧にご説明いただきありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのマクロでコピー後の貼り付け先を毎回指定したところにしたい 5 2022/08/12 10:47
- Excel(エクセル) VBA 特定の列に入っているテキストをコピペ 2 2023/06/14 11:24
- Excel(エクセル) ExcelVBA メモ帳を起動し名前を付けて指定フォルダに保存 2 2022/04/18 13:15
- Excel(エクセル) 複数のExcelブックのシート1の内容を1つのExcelブックにコピー貼り付けたいのでvbaコードを 7 2023/02/10 23:20
- Excel(エクセル) Excelに文字データのみを貼り付けたい 8 2023/05/03 15:38
- Visual Basic(VBA) Excel vbaについて知恵もしくは、コード教えて下さいm(__)m ① 表にあるデータをコピー、 2 2022/09/01 23:57
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/04 17:58
- Visual Basic(VBA) Excel(VBA) 特定の条件に該当する行の値、書式を同じセルにコピ&ペーストしたいです 1 2022/05/21 18:18
- Visual Basic(VBA) 範囲を指定して別シートにコピペ 2 2022/09/15 07:32
- Visual Basic(VBA) エクセルVBAで『A列』に新規で数値を入力し『B列』から右方向の空白セルにその値を貼り付ける方法 4 2022/11/05 08:37
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Excel VBAで改行を含めたセルのコピー
Excel(エクセル)
-
エクセルVBAで、複数セルのデータをひとつのセルに改行してまとめたいのですか・・・
Excel(エクセル)
-
VBAでメモ帳にコピペをしたいのですが…
PowerPoint(パワーポイント)
-
-
4
VBAのフォント変更(エクセルからoutlookのメール作成において)
Visual Basic(VBA)
-
5
Excelの複数のセルをひとつのセルにまとめて貼り付けをするときに改行
Excel(エクセル)
-
6
Excel、VBA、1行中複数セルにセル内改行、行方向に分割
Excel(エクセル)
-
7
エクセルのセル内で改行コピーしたい。
Excel(エクセル)
-
8
[VBA]改行入りのセルの値を配列に格納したい
Visual Basic(VBA)
-
9
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
10
Excel VBAで同じフォルダ内のファイルを開くには?
Excel(エクセル)
-
11
VBAのテキストボックスに文字列を貼り付ける方法
Access(アクセス)
-
12
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
13
テキストファイルから改行コードを削除して読込む方法
Visual Basic(VBA)
-
14
split関数で区切り文字がない場合
Visual Basic(VBA)
-
15
UserForm1.Showでエラーになります。
工学
-
16
ExcelVBAでセルを編集状態にする方法
Excel(エクセル)
-
17
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
18
【VBA】コピー&複数個所のペースト繰り返し
Excel(エクセル)
-
19
貼り付けで複数セルに貼り付けたい
Excel(エクセル)
-
20
EXCEL VBAでテキストファイルの特定の場所にデータを書き込む方法
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
word
-
PowerPoint SmartArtの箇条書...
-
PDF→CSVへ変換
-
illustratorとExcelは連携出来...
-
バイナリファイルの編集
-
capcutってアプリで質問です。 ...
-
イラレでダブルクリックで文字...
-
HPの投稿データをエクセルで一...
-
Videostudioテキストの横スクロ...
-
Adobe Acrobatについて
-
サクラエディタで二つのテキス...
-
Excel VBAで改行を含む文字列を...
-
Winmergeで比較できるものはな...
-
ダヴィンチリゾルブでテキスト...
-
Pages 09 でテキストボックスで...
-
画像からテキストデータを正確...
-
Publisherをエクセルファイルに
-
davinci resolveを使っているの...
-
フォトショップで複数テキスト...
-
アクセスのOR検索
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
word
-
PDF→CSVへ変換
-
illustratorとExcelは連携出来...
-
PowerPoint SmartArtの箇条書...
-
イラレでダブルクリックで文字...
-
Illustratorテキストエリアへ塗...
-
バイナリファイルの編集
-
Excel VBAで改行を含む文字列を...
-
Publisherをエクセルファイルに
-
サクラエディタで二つのテキス...
-
exe bat
-
davinci resolveを使っているの...
-
capcutってアプリで質問です。 ...
-
PDF-XChange Viewer のタイプラ...
-
パワーポイントでテキストボッ...
-
PDF文書で斜めテキスト
-
Accessテーブルの結合で別々の...
-
Illustratorのテキストの更新に...
-
PDFファイルで画像化された文書...
-
フォトショップで複数テキスト...
おすすめ情報
コピー元のデータは、Excel以外からコピーします。
VBAでWebスクレイピングした結果を、Excelに貼り付けようとしています。
その為、コピー内容はブラウザ画面で、[Ctl+A]-[Ctl+C]した状態とお考え下さい。