Visual Basic

ベストアンサー：>HTMLが直接記述されていないサイト 相対アドレス名だけで”直接記述されていない”わけじゃない 最初の動画のURLは https://www.buzzvideo.com/@%E5%8...

ベストアンサー：Sub ループカウンター用() Dim i As Long Dim r1 As Range Dim r As Range Dim ws As Worksheet Dim EndRow As L...

ベストアンサー：＞いわゆる自分で設定した形式（ユーザー設定など）だとグラフ側で期間が編集できないことから、 日付の書式がグラフの形状や編集の可、不可に影響することはないです。 下のグラフの表の日付部分のスクリ...

ベストアンサー：Range("A1:C1").ClearContents

ベストアンサー：先程は失礼しました。 質問文から読み取れませんでした。 訂正したものです。 ① Sub TestCode() Dim i As Long For i = 1 To Selection....

ベストアンサー：If i Mod j <> 0 Then Cells(i, 1).Value = i End If ここの部分、割り切れなかっらセルに記入するようにしてありますが、 例えば i が...

ベストアンサー：Sub 追加() Dim new_no As Long Dim last_row As Long Dim tmp As String Call 初期化 Application.ScreenUpd...

ベストアンサー：この質問自体は必要のないものになったので、何らかの形で終了させた方がいいと思います。

ベストアンサー：SQLをご存じなら、ExcelでもAccessでもそれが使えるので、「データが全部で1万件以内とか」「すごく小規模」ならば、どっちでやっても同じといえば同じです。 また、「SQL」を知らなくて...

ベストアンサー：このコードで全く問題ないですね。全角のスペースも半角のスペースも削除されます。 それに添付図を見ると先頭にスペースが付いているようには見えないです。というかついていませんが？ サンプルを作ると...

ベストアンサー：やってみたら、そのプログラムで枚数分印刷されました。プログラムは正しいです。 プリンターの方の問題たと思います。複数枚印刷未対応なのか。そのような設定になっているのか。 ループで複数回印刷した方...

ベストアンサー：End でよいのでは

ベストアンサー：FOR EACHでのセルへのアクセスは早くはありません。 といっても1000やそこらはScreenUpdatingを殺せば一瞬ですけど。 仮にこれが値であるなら配列で処理すれば高速になりますが 数式

ベストアンサー：これがシンプルだと思いますが。 Sub 連番() Dim i As Long Dim j As Long For i = 1 To 9999 For j = 1 To 5 Cells(...

ベストアンサー：こういうことですか？ Sub Macro1() For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row Select Case Left(Range(&...