質問一覧

  1. すいません、ExcelVBAの初心者です。以下の文を構成しましたが、「型...

    「型が一致しません」というエラーが出ます。助けてください。 Private Sub 決定_Click() Dim i As Integer i = 2 Do While Cells(i, 1) <> "" If Cells(i, 2).Value = "" Then Cells(i, 2).Value = 出身県.Text If Cells...
    解決済み質問日時:2014/08/26 15:28回答数:3閲覧数:22
    コンピュータテクノロジー>プログラミング>Visual Basic
  2. 実仕様への適用 お世話になっております。 around30yearsold様に教え...

    ...("sheet1").Cells(i, 12) = "異物" Then 'sheet2のループ x = 3 y = 1 Do While .Cells...(index)を下方向へ→sheet1と同じindexを検索 Do While .Cells...
    解決済み質問日時:2012/12/11 19:54回答数:1閲覧数:73
    地域、旅行、お出かけ>交通、地図>鉄道、列車、駅
  3. マクロ IFの複数条件 次のマクロで セルD6に値があり、セルE6が空白...

    空白の時だけ Cells(i, 6) = Cells(i, 4) - Cells(i, 1)部分を計算させたいのですが いろいろ調べてまましたがよくわか りませんでした。。。 どのように記述すれば良いでしょうか? よろしくお願いします。 あと、- Cells(i, 1)部分...
    解決済み質問日時:2017/09/28 06:35回答数:1閲覧数:36
    コンピュータテクノロジー>プログラミング>Visual Basic
  4. エクセルのVBAの質問です。 A列、B列の全ての行に数字が入力されてお...

    ... While .Cells(i, 1) <> "" 'A列のセルが空でない間ループする If .Cells(i, 1) = "1" Then .Cells(i, 3) = "1" 'A列が1の場合はC列に1 ElseIf .Cells...
    解決済み質問日時:2015/02/08 14:52回答数:2閲覧数:38
    コンピュータテクノロジー>プログラミング>Visual Basic
  5. Excel VBAのコンボボックスの作成に関しての質問です。 添付の様なリ...

    ... Sub Test() Dim r r = 2 With ActiveSheet.ComboBox1 .Clear Do While Cells(r, 3).Value <> "" If Cells(r, 2).Value <>...
    解決済み質問日時:2017/05/15 14:10回答数:1閲覧数:18
    スマートデバイス、PC、家電>Office系ソフトウェア>Excel
  6. エクセルで、 D列の中で、空白以降の右側の文字を消す マクロが上手く...

    上手くいきません。 Sub sample() Dim i As Long i = 1 Do While i <= 3000 Columns(D).Activate CutRight = Left(Cells("i", 0), Find(" ", Cells("i", 0))) i = i + 1 Loop End Sub 今はFindで、Subまたはファンクションが定義さ...
    解決済み質問日時:2019/04/03 18:27回答数:2閲覧数:13
    教養と学問、サイエンス>言葉、語学>英語
  7. Visual Basicでのプログラミングの質問です。 10個の整数データa(10...

    ... Sub 昇順() Dim a, b, c, d As Long c = 1 Do While Cells(c, 1) <> "" c = c + 1 Loop c = c - 1 For b = 1 To c - 1 For d = 1 To c - 1 If Cells...
    解決済み質問日時:2015/07/18 18:03回答数:1閲覧数:38
    コンピュータテクノロジー>プログラミング>Visual Basic
  8. ワークシート2のB5に探す値が入っているとして、ワークシート1のA2:R5...

    ...() Dim sResult As Variant Dim i As Long i = 1 Do While Cells... On Error GoTo 0 Cells(i, 2).Offset(0, 1) = sResult i = i + 1 Loop Exit Sub...
    解決済み質問日時:2015/03/23 22:31回答数:1閲覧数:27
    コンピュータテクノロジー>プログラミング>Visual Basic
  9. 現在エクセルVBAを使用して、棒の径(太さ)を測定するシステムを作成...

    ... Sub サイズ() Dim temp As Double Dim a, b, c, d As Long a = 1 Do While Cells... Cells(c, b).Interior.ColorIndex = 1 Then d = d + 15 End If Next Cells...
    解決済み質問日時:2015/08/11 20:13回答数:1閲覧数:29
    コンピュータテクノロジー>プログラミング
  10. Do While LoopとDo Until LoopとDo(条件)Exit Loopの使い分けを教え...

    教えてください エクセルで図のように70点以上は合格、以下は不合格とするマクロを作るとします。 ① Sub Do While Loopの場合() 'B列が空白でない間は処理を繰り返す Dim 練習8の行 As Integer 練習8の行 = 3 Do While Cells(...
    解決済み質問日時:2011/07/11 22:59回答数:2閲覧数:842
    スマートデバイス、PC、家電>Office系ソフトウェア>Excel

約1,779件中1~10件目

検索しても答えが見つからない方は…

検索対象

すべて(1,779件)

表示順序

表示順序