• ベストアンサー

ExcelのVBAで行番号の数値を取得する方法

ExcelのVBAで行番号の数値のみを取得する方法を教えて下さい。 （例） アクティブセルが「A55」の場合 ↓ 「55」という数字のみを変数に代入 よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • NeilMania
  • ベストアンサー率30% (40/131)
回答No.1

ＶＢＡはじめたばかりなので、自信はありませんが…。 Sub test() Dim I As Integer I = ActiveCell.Row ' MsgBox I End Sub

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • Excel VBAで読み込んだテキストから任意のデータを取得するには？

    Excel VBAで外部テキストをTextBoxに読み込み、そのテキストの中から任意の場所の数値を取得する（変数に代入する）にはどのようにしたらいいのでしょうか？ 例えば、外部テキストが以下のようなかんじだったとします。 ここから--------------------- ・・・ 通勤時間A root 60 root 120 root 45 root 225 root 30 通勤時間B root 90 root 150 root 75 ・・・ ここまで--------------------- このテキストの中から通勤時間Aを検索し、その下の行にある、60,120,45,225,30という数値を変数に代入したいのです。 テキストをTextBoxに読み込む方法はわかりますが、数値の検索方法がわかりません。どうすればいいでしょうか？ （テキストをTextBoxに読み込まなくても数値を検索する方法があればそちらの方法もお願いします）。

  • エクセル　ＶＢＡ　の行選択

    エクセルＶＢＡで行を選択する場合 Rows(1,1).select Range(Cells(2,2),Cells(5, 5)).EntireRow.Select の方法があると知りました。 この数値の部分に変数を入れるとエラーがでてしまいました。 どうすれば変数で行を選択することができるのか教えてください。 2003を使用しております。

  • エクセルVBAでの行の取得方法

    myrow = Cells(1, 1).Row + 1 などの方法で行を取得するのではなく、 エクセルのセルにある数字、たとえば　A1に３、B1に３ で３行目を取得できませんか？ Cellsの括弧の中をValueで指定してもエラーとなります…

  • EXCEL VBAでの数値から列名取得

    EXCEL(Excel2003)のVBAで数値から列名を取得する関数 はないでしょうか。 例えば１と指定すればAを取得し、５を指定すればEを取得するというような感じです。 宜しくお願いします。

  • A列で数値の入っている最も下の行番号を取得したい

    Excelで、A1, A2, A3・・・と一連のデータが入っています。データ量はその都度異なります。数値として0も含まれますが、一連のデータ内にnullセルはありません。別の場所での計算処理で、データの入っている最も下のセルの行番号を使います。そこで、その番号を自動的に取得する関数または方法はないものでしょうか。

  • EXCEL2010　該当行の数値取得方法について

    良い方法があれば、教えて頂けませんでしょうか。 添付画像のように、明細に開始日毎（昇順）に数値A・Bが登録されています。 例えば今日が、6/2であれば、38行目の数値A・Bを取得する方法はありませんで しょうか？ （6/3～6/7までは同様、6/8の場合39行目より取得） 或いは「＊」をＡ列に表示する関数を設定してあるので、最後の「＊」が表示されて いる行（38行目）の数値A・Bを取得するでも構いません。 どうか、よろしくお願い致します。

  • エクセル　ＶＢＡにて行削除をしたい…

    エクセル2003にて　ＶＢＡ初心者です。 Ａ列1～100に101～200までに番号が振ってあります。 Ｚ列に記入がない場合はその行を削除するＶＢＡを教えてください。 例 　A 　B 　C 　D 　E 　F ……　Z 1　　101　　　　　　　　　　　　　　　文字有り 2　　102　　　　　　　　　　　　　　　ブランク 3　　103　　　　　　　　　　　　　　　ブランク 4　　104　　　　　　　　　　　　　　　文字有り 5　　105　　　　　　　　　　　　　　　文字有り … 99　　199　　　　　　　　　　　　　　文字有り 100 　200　　　　　　　　　　　　　　ブランク この様な場合2,3,100の行ごと削除をするという形式のものです。 また、この場合A列の番号も自動で変われば（104が102になる等）最高です。 詳しい方教えてください。よろしくお願いします。

  • 数値の入った一番最後の行番号を求めたい

    数値の入った一番最後の行番号を求めたい 　　　　Ａ　　Ｂ　　Ｃ　　Ｄ １０１　　　　１　　　　　■ １０２　 １０３　　　　１ １０４　　　　１ １０５ １０６ １０７　　　　１ １０８ １０９ 上のようにＢ列に１という数字がランダムに入っているとします。 例えばＤ１０１のセルに Ｂ列に「１」が入っている一番下の行番号（上の場合１０７） を求める関数はどのようにやれば良いのでしょう？ 初心者の為ＲＯＷやＲＯＷＳを使用して解決できなかったのですが、 ＶＢＡではなく関数でご教授いただければ幸いです。

  • EXCEL VBAによる列番号の取得

    a行のx列まである色で塗られている． 色の塗られている範囲で，最終列にあたるセルの 列番号を取得したい． このような場合，どのようにVBAを記述したらよいのでしょうか？ どうぞよろしくお願いいたします．

  • エクセルVBAについて教えてください。

    エクセル2007を使ったVBAについて2つ質問です。 1つ目の質問は、5列目の右端の数字を2列目の右端に持ってくるため、 Range("B2").End(xlToRight).Next.Select ActiveCell.FormulaR1C1 = Range("A5").End(xlToRight) というVBAを組んだのですが、2列目に空白が入っている場合うまく動かないため動くように したいのですが、どのように組めばいいのかわかりません。 例 　　　A　　　　　B　　　　　C　　　　　D　　　　　E　　　　　F　　　　　G　　　　　H　　　　　I　　　　　J　　　　　K 1　 2　【数値1】　　□　　　　□　　　　 □　　　　　1　　　　　2　　　　　3　　　　　4　　　　　5　 3 4 5　【数値2】　 　6　　 　　7　　 　　8　　　 　9　　　 　10 6 ※□は空白 上記の例の場合、5行目の右端である10を2行目の空白を除いた右端である5の隣に持っていきたいです。 2つ目の質問ですが上記例の2列目の両端（1と5）を選択してDeleteする方法がわかりません。 2つの質問についてわかる方おりましたら教えていただけると助かります。 よろしくお願いしします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する