電子書籍の厳選無料作品が豊富!

For文

の検索結果 (10,000件 21〜 40 件を表示)

Excel VBA For Each Next構文内の別シートを対象とする方法

…こんにちは。 VBA初心者のものですが教えてください。 「sheet1のC29:U29とsheet2のC31:G31について 1より小さければ小数第2位まで表示する」 の構文を作成したいのですが、 下記の構文で...…

解決

For next使う場合、next iはできない?

…vbsでFor next使う場合、next iはできないのですか? for i = 1 to 2 msgbox "" next i をすると "ステートメントの末尾が不正です"800A401 になります。 しかし for i = 1 to 2 msgbox "" next にすると、問題な...…

解決

VBAのエラーでNextに対するForがありません。(最後のNext i のところで)

…下記のプログラムを実行すると表題のエラーが出ます。 コード上、何かおかしいでしょうか。 Sub kintaiC() Dim i As Long, j As Long, lastRow As Long Dim mycol As Long, endT As Long Dim wScriptHost As Object Dim Fi...…

解決

for文の実行速度を遅くしたいのですが

…For t = 0 To 6 Picture1.Line (0, 0)-(100 * Cos(t), 100 * Sin(t)) Next t こういうfor文だと、一瞬でtが6まで行ってしまうので アニメーションとして成り立ちません。 ゆっくりfor文を実行させたいのです...…

締切

エクセルVBAでFor each文

…下記のようなコードを書きたいのですが「オブジェクトが必要です」というエラーが 出力されてしまいできないようです。何か代替案はありますでしょうか。 --- dim ws as worksheet with thisworkboo...…

解決

エクセルVBAで、INSERT文を生成

…エクセルのデータよりDBにINSERTするためのINSERT文を生成するマクロを作っています。 INSERT文生成のVBAはできたのですが、少し仕様がいつもと違い困っております。皆様のお知恵を拝借できれ...…

解決

教えて For Each R In Target

…いつもお世話になっております よろしくお願いします ネットで見つけたマクロなのですが、どなたか解説していただけないでしょうか Private Sub Worksheet_Change(ByVal Target As Range)  Dim R As Range ...…

解決

VBAのFor Eachのセル読み込み順番について。

…こんにちは。 VBAのFor Eachのexcelセル読み込み順番について お伺いします。 for each MjObj in range("A1:D10") ********** next とした場合にセルはA1を先頭に左から右列へ、 上から下行へと順次読...…

解決

構造体配列の特定のメンバーをFor~Eachで

…みなさんこんにちは。昔Vb6を少々やっていましたが ここ数年遠のいていました。 必要に迫られ最近Vb2010を勉強しはじめた50歳です。 サンプルの通り3つのメンバーを持つ構...…

解決

VB.NETで階乗を求めるプログラムを作成する

…再帰を使わず、For文による繰り返しにより、階乗を求めるプログラムを作成したいのです。 ↓ここからどうすれば良いか、ご教授お願い致します。 Dim n , i As Integer n = Textbox1.Text For i = 1...…

解決

For ~ Next の中での Dim宣言について

…四角形を下方向にずらしながら繰り返し描きたい場合、 以下のソースのようにFor ~ Next の中での Dim宣言を 行うのは一般的でしょうか。 他にスマートな記述があれば教えてください。 よろ...…

解決

なぜか「Nextに対応するForがありません」

…A4で印刷するシートのリスト PrintA4s() について Worksheets(PrintA4S).Select For Each Sht In WorkSheets(PrintA4S) With Sht With .PageSetup .PaperSize = xlPaperA4 .Orientation = xlPortrait...…

解決

マクロで100マス計算! Dim i,j As Integer For i = 2 ToRang

…マクロで100マス計算! Dim i,j As Integer For i = 2 ToRange(”A1”).End(xlDown).Row For j=2 To Range(”B1”).End(xlToRight).Column Cells(i,j).Value = Cells(i,1).Value * Cells(1,j).Value Next j Next i Endsub 上記のように記...…

解決

VBA For Eachでセル内の文字列を一個ずつ取り出すには

…エクセル2000です。 たとえばA1セル内の文字列を一個ずつ取り出す場合、 Sub test01() For i = 1 To Len(Range("A1").Value) Cells(i, "B").Value = Range("A1").Characters(i, 1).Text Next End Sub このよう...…

解決

他言語で言うcontinue文

…他言語で言うcontinue文に相当する命令はVBに用意されているのでしょうか? continue文とはループ中の後続の処理をやめループの先頭に戻るという命令です。 なんか探したけど無かったも...…

解決

TMNのCrazy For You

…こんにちは。 TMNの事で教えてもらいたいのですが、 アルバム「EXPO」に収録されている “ Crazy For You ” に宇都宮 隆と共演(?)している 女優さんを教えてください。 お願いし...…

解決

Five For Fighting1の100 Yearsの歌詞

…Five For Fightingの100 Yearsの歌詞の意味が分かる方いらしゃったら、是非教えてください!…

解決

エクセルマクロ文で、赤文字セルは保持、黒のセル文字削除する方法

…For Each rng In Range("G2:G25") If rng.Value "" Then Set out = Range("A2:E111").Find(rng.Value) If Not out Is Nothing Then igo = out.Address End If Do While Not out Is Nothing out.Font.ColorIndex = 3 Set out = Ran...…

解決

この一文におけるforの意味を教えて下さい

…For it is a mistake to suppose that, because modern architects are particularly concerned to relate buildings more closely to the needs they have to serve, they are only interested in the practical side of architecture. 始めのForが無くても大丈...…

解決

ProgressBarを用いる場合、全体の処理数の求め方(Do Loop文に関して)。

…ProgressBarを用いる場合、全体の処理数を求めますが、Do Loopを用いる場合、For文と異なり必ずしもすぐに全処理数が分かるわけではありません。そのような場合、どのように全処理数を求めれ...…

解決

検索で見つからないときは質問してみよう!

Q質問する(無料)