No.2
- 回答日時:
VBAというのは、何のVBAか分かりませんが、Excel なら、以下のような、ワークシート関数(アドイン)を使っても良いのではないかと思います。
もちろん、VBAのユーザー定義関数を作ることも可能です。'//
Sub TestRnd()
Dim i As Long
Dim n As Long, k As String
Dim ret As Long
Cells(1, 1).Resize(2, 4).ClearContents
Randomize
For i = 1 To 3
n = Int(Rnd * 9 + 1)
ret = n + ret
Cells(1, i).Value = n
Cells(2, i).Value = Evaluate("Dec2Bin(" & n & ")")
Next i
Application.Wait Now + TimeSerial(0, 0, 3)
k = Evaluate("Dec2Bin(" & ret & ")")
Cells(2, i).Value = k
MsgBox k & " は10進でいくつ?", , "結果"
Cells(1, i).Value = ret
End Sub
No.3ベストアンサー
- 回答日時:
関数でやるなら
A列 B列
1004
1015
1106
111115
A列はアポストロフィ+数字100のような入れ方をする(文字列)。
B1の式は =bin2dec(A1)
B2、B3はB1の式複写
最終行はB4に=SUM(B1:B3)
A4には=dec2bin(B4)
データが沢山あればB4以下に入力制約数を超える空白行を作っておけば良い。
最終行と思しき行に、B4,A4の式を入れる(範囲を修正する必要あるが)
ーーー
VBAでは出来ないことも無かろうが、VBAはエクセルのためのスクリプトなので、あまりこういうことは出くわさない問題だろう。特に便利な仕掛け(関数)も無いと思う。だから自作(下記WEBきじなど)
ーーー
足し算までは
Sub test01()
Dim n As String
s = 0
p1:
n = 0
x = InputBox("2進数入力、終わりは9入力")
If x = "9" Then GoTo p2
j = Len(x)
For i = 1 To j
n = n + Mid(x, i, 1) * 2 ^ (j - i)
Next
MsgBox n '参考
s = s + n
GoTo p1
p2:
MsgBox s '合計
End Sub
sを2進数表示は、
http://oshiete.goo.ne.jp/qa/858429.html
など参照。
0,1以外の入力チェックや、合計がエクセルで10進15桁の制約など考慮してない。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(プログラミング・Web制作) Pythonを用いたフラッシュ暗算ソフトの開発に必要なもの 2 2023/01/29 02:22
- 数学 小学生がたった1日で19×19までかんぺきに暗算できる本、のおみやげ算。数学的に言うと何? 3 2023/04/07 09:35
- Excel(エクセル) 表計算ソフトcalcにおいて、1時間10分を1.1と表記する方法とそれらを集計する方法は? 4 2022/04/06 16:54
- Visual Basic(VBA) EXCEL VBAで教えてください。 1 2022/12/22 04:20
- C言語・C++・C# C言語 3 2022/10/04 15:07
- スピーカー・コンポ・ステレオ 電気交流の実効値と値が違う平均値ではオームの法則が成り立たない理由を教えて下さい。 4 2022/05/02 09:53
- その他(プログラミング・Web制作) Visual Studio Code 関数の使い方について 3 2023/05/31 13:15
- Excel(エクセル) Excel(エクセル)でフィルター抽出後、非表示の行を計算しないで、合計を算出する方法 【内容】 添 4 2023/01/30 17:17
- その他(プログラミング・Web制作) プログラムが書けません。 6 2023/01/22 22:58
- C言語・C++・C# このプログラミングの問題を教えてほしいです。 キーボードからデータ数nとn個のデータを入力し、平均値 3 2022/12/19 22:51
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
緯度、経度の 10進法と 60進法...
-
VB6で16進のXOR演算
-
マンセル⇔XYZ,RGB変換式或いは...
-
線対称の角度を求める
-
Excel-VBAのmsgBox()の不思議
-
英単語をカタカナに変換するス...
-
10進数を2進数に変換するプログ...
-
3のつく数字と3の倍数のみを表...
-
10進数をBCDに変換する方法
-
FortranをC++(VC++)へ変換
-
EUCからUTF-8へのコード変換
-
MATLAB用のプログラムをScilab...
-
画像ファイルの変換
-
visual c++の文字コード判別
-
SJIS⇔UTF-8の文字コード...
-
VBAを使って二進法計算
-
分を時間に変換するプログラム
-
ImageMagickでPSDを変換するには。
-
C#で漢字→ローマ字を変換
-
数値英単語変換プログラム
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
緯度、経度の 10進法と 60進法...
-
Excel-VBAのmsgBox()の不思議
-
Mac 乗数の入力方法
-
家電製品の電力周波数を変える機械
-
3のつく数字と3の倍数のみを表...
-
bmp→jpgに、jpg→bmpに
-
10進数をBCDに変換する方法
-
【EXCEL】カナ、ひらがなを英字...
-
StrConvの使い方について教えて...
-
分を時間に変換するプログラム
-
画像ファイル変換(Tiff→PDF)
-
マンセル⇔XYZ,RGB変換式或いは...
-
C/C++→JAVAに変換するツール
-
VB6からVB2010への変換について
-
c++でmatからvectorへの変換の...
-
DOSコマンドでの文字コード変換...
-
VB.NETをJavaに変換するツール...
-
SJIS⇔UTF-8の文字コード...
-
なぜ通信には16進数文字列が使...
-
C#でのpngからbmpへの変換について
おすすめ情報