No.2
- 回答日時:
こんばんは。
現在のところは、二桁までです。
ユーザー定義関数を作りました。"ZZ" まで、出力可能です。
大文字・小文字は可能ですが、全角は受けないようにしてあります。
Sub Test()
Dim d As Integer
d = Alpha2Num("AB")
MsgBox CStr(d)
End Sub
Function Alpha2Num(ByVal arg As String)
Dim i As Integer
Dim j As Integer
arg = StrConv(arg, vbLowerCase)
If arg Like "[a-z]*" Then
If Len(arg) = 2 Then
i = (Asc(Mid(arg, 2, 1)) - 96)
j = (Asc(Mid(arg, 1, 1)) - 96) * 26
Else
i = (Asc(arg) - 96)
End If
End If
Alpha2Num = j + i
End Function
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
誕生日にもらった意外なもの
みなさんがもらった誕生日プレゼントで面白いものがあったらぜひ教えてください!
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
VB.NETで1→A、2→B、26→Z、27→AAの変換をしたい
Visual Basic(VBA)
-
VBAのfor...next構文で i = A to Z としたい。
PowerPoint(パワーポイント)
-
エクセルでアルファベット5段階を数字の5段階に変換したいのですが
その他(教育・科学・学問)
-
-
4
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
5
VBAでダブルコーテーション入りの数式をセルにセットしたい
Visual Basic(VBA)
-
6
エクセルでアルファベットか数値の判定をしたいのですが
Excel(エクセル)
-
7
VBAで色の付いているセルの行削除
Excel(エクセル)
-
8
Excel-vba 文字列と変数を連結して更に変数として扱いたい
その他(プログラミング・Web制作)
-
9
列の足し算(Z+1=AA)について教えてください。
Excel(エクセル)
-
10
もしセルが#N/A"なら~をする・・・には?"
Excel(エクセル)
-
11
文字列から英数字のみを抽出する関数
Excel(エクセル)
-
12
VBA 数式を残して値をクリアについて
Excel(エクセル)
-
13
VBAで別モジュールへの変数の受け渡し方法
Visual Basic(VBA)
-
14
アルファベットを数字(その逆)に置き換える方法?
Excel(エクセル)
-
15
VBAでの Replace関数で、ワイルドカードは使えないのでしょうか?
Visual Basic(VBA)
-
16
なぜこんな初歩的なVBAのIf文でエラーか発生して使えないのか、全く理解出来ません。誰か助けてくださ
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
PS4コントローラーをPCでゲーム...
-
ActiveReportsでPDFを出力した...
-
コンセントの電力は入力と出力...
-
プログラムについての質問です...
-
4Kの外部モニターに出力すると...
-
cout と cerrの違い
-
VBAでテキスト出力時のスペース...
-
エクセルVBAにて アルファ...
-
coutで出力した文字を消去する...
-
Accessのテーブルからcsv出力す...
-
エクセルで英字と数字を組み合...
-
携帯の液晶画像をパソコンに出...
-
リストボックスの内容を テキ...
-
【PowerPoint VBAの高速化】
-
Windows Formアプリからコンソ...
-
スマホのバッテリー消費につい...
-
ACCESSからExcelへエクスポート...
-
COBOLのMOVEで桁数が異なる場合
-
VBAのExecメソッドで画面を非表...
-
AccessでPDFを複数ファイルにし...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
PS4コントローラーをPCでゲーム...
-
4Kの外部モニターに出力すると...
-
MMDでavi出力が出来ない
-
プログラムについての質問です...
-
COBOLのMOVEで桁数が異なる場合
-
cout と cerrの違い
-
コンセントの電力は入力と出力...
-
スマホのバッテリー消費につい...
-
アクセスでエクセルに出力する...
-
PC電源は、出力DC12VとDC5Ⅴで...
-
Windows Formアプリからコンソ...
-
ACCESS クエリ→フォーム...
-
VBAのExecメソッドで画面を非表...
-
printfの書式%.*s
-
無線とかアンテナに関しの質問...
-
【ExcelVBA】最終行の取得で困...
-
ACCESSからExcelへエクスポート...
-
Accessのテーブルからcsv出力す...
-
CRC16計算について
-
Excel VBAで値を変えながら、pd...
おすすめ情報