質問一覧

  1. ExcelVBAの Cells(.Rows.Count, 1).End(xlUp).Row Cells(Rows.Count, ...

    1).End(xlUp).Row Rowsの前に付ける「.(ドット)」の意味の違いって何ですか?
    解決済み質問日時:2014/07/22 11:50回答数:2閲覧数:14
    コンピュータテクノロジー>プログラミング>Visual Basic
  2. エクセルのマクロで 添付画像のように A列に発注番号があり発注ナンバ...

    ... = False For i = Cells(Rows.Count, 1).End(xlUp)...("指定文字", 1) End If i = i - ii + 1 End With Next i APP.ScreenUpdating = True End...
    解決済み質問日時:2019/01/07 22:56回答数:1閲覧数:27
    スマートデバイス、PC、家電>Office系ソフトウェア>Excel
  3. マクロを使って請求書の一括印刷をしたいと思っています。 その際に、...

    ... LastRow = .Range("B2").End(xlDown).Row For i = 2 To LastRow Range("Z2").Value = .Range("B" & i).Value ActiveSheet.PrintPreview Next End With End...
    解決済み質問日時:2017/01/27 15:55回答数:2閲覧数:19
    スマートデバイス、PC、家電>Office系ソフトウェア>Excel
  4. Option Explicit Sub フラグ() Dim i For i = 6 To Cells(Rows.Coun...

    Cells(Rows.Count, 2).End(xlUp).Row Cells(i, 1) = 0 Cells(i + 1, 1) = 1 i = i + 1 Next End Sub Sub フィルタ設定() Dim ws Dim LastRow As Long ws = Sheets("aaaa.11111111.CSV") LastRow = Cells(Rows.Count, 4).End(xl...
    解決済み質問日時:2018/12/17 11:30回答数:1閲覧数:17
    コンピュータテクノロジー>プログラミング>Visual Basic
  5. excel2010オートフィルターで、抽出された データを削除したい   sub...

    sub macro1()   Dim MaxDay As Long Dim MinDay As Long Dim LastRow As Long  LastRow = ActiveSheet.Range("A" & Rows.Count).End(xlUp).Row '最終行 MaxDay = WorksheetFunction.Max(Range("B:B")) ' B列最大...
    解決済み質問日時:2018/12/31 02:54回答数:2閲覧数:29
    スマートデバイス、PC、家電>Office系ソフトウェア>Excel
  6. ExcelVBAについて ユーザーフォームを作っていて 単純なことなのです...

    単純なことなのですが With Cells(Rows.Count, 1).End(xlUp).Offset(1) .Value = 1 .Offset(0, 1).Value = day.Value .Offset(0, 1).Value = kamoku.Value .Offset(0, 1).Value = tekiyou.Value .Offset(0, 1).Value = price.Valu...
    解決済み質問日時:2015/04/29 16:42回答数:1閲覧数:7
    コンピュータテクノロジー>プログラミング>Visual Basic
  7. エクセルマクロでグラフを作成する手順 sheet2 にて i=Range("A" & Ro...

    Rows.Count).End(xlUp).Row j=Range("B1").End(xlToRight).Column Range(Cells(1,1),cells(i、j)の範囲の棒グラフを sheet1のA1から縦600 横1200で作成するマクロを 教えてください。
    解決済み質問日時:2016/03/08 22:44回答数:2閲覧数:23
    スマートデバイス、PC、家電>Office系ソフトウェア>Excel
  8. ExcelVBAについて教えてください。 Sub sample() Dim i As Long, r As...

    As Range Application.ScreenUpdating = False With Sheets("sheet1") For i = 1 To .Cells(Rows.Count, "C").End(xlUp).Row If .Cells(i, "C") <> "" Then Set r = Sheets("sheet2").Columns("B").Find _ (what:=.Cells(i, "C"), l...
    解決済み質問日時:2018/06/08 09:11回答数:1閲覧数:5
    コンピュータテクノロジー>プログラミング>Visual Basic
  9. マクロ初心者です。 マクロに以下の処理をさせたくて組んでみたのです...

    ...("sheet1") For i = 2 To Cells(Rows.Count, 1)... 0 _ Then Cells(3, i).EntireRow.Delete shift:=xlUp Next End With End Sub マクロ・知恵袋投稿、...
    解決済み質問日時:2017/05/21 21:34回答数:2閲覧数:18
    コンピュータテクノロジー>プログラミング>Visual Basic
  10. エクセルVBA 『2種類の数式を行数指定して貼り付けるマクロ』 範囲をA...

    ...("A2:A" & Range("A" & Rows.Count).End(xlUp).Row) .Formula = Range("A2").Formula End With 今回行いたいマクロは、...
    解決済み質問日時:2017/10/20 18:57回答数:1閲覧数:12
    スマートデバイス、PC、家電>Office系ソフトウェア>Excel

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

検索対象

すべて(7,806件)

表示順序

表示順序