- ベストアンサー
Excel 2003のvba で質問
watabe007の回答
- watabe007
- ベストアンサー率62% (476/760)
アクティブセルに値が有るとして With ActiveCell n = Len(.Value / 10) - InStrRev(.Value / 10, ".") MsgBox .Value - (1 / (10 ^ n)) End With
関連するQ&A
- 文字列操作（ExcelのVBAですが）
特定のExcelセル内にある文字列について、 例えば、 138.40.8.7 と入っている場合、 138.40.08.7 に、 35.9.1.6 と入っている場合、 35.09.01.6 にするVBA関数を作りたいのです。（セル関数でもかまわないですが） つまり、小数点で区切られている２番目と３番目の数字が 一桁の場合、頭に０を付けて、必ず二桁になるようにしたいわけです。 どなたか、ご教授くださいませ。 よろしくお願い致します。
- ベストアンサー
- Visual Basic
- Excel を使った合計、平均など
1桁おきの計算、2桁おきの計算など ＶＢＡ あるいは そのほかを使った計算方法はあるようですが Excel のみでできる方法はあるのでしょうか あるようでしたら是非教えてください １ ２ ３ ４ ５ とある場合 通常では １５ となりますが １行おきだと ９となります 2 行おきだと ５となります よろしくお願いいたします。 .
- ベストアンサー
- Excel（エクセル）
- エクセルＶＢＡのマクロに関して
タテＡに６桁で並んでいる数字の下２桁だけ削除したいのですが、 ＶＢＡ初心者なのでうまくマクロが組めませんorz わかる方いらっしゃいましたら教えて下さい。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- VBA 有効数字3桁表示コードの質問。
Office 2010 Excel のマクロコードで特定セルの計算結果だけを有効数字3桁で表示する方法を教えて下さい。よろしくお願いします。
- ベストアンサー
- その他（生活・暮らし）
- エクセルの関数についての質問ですが、
エクセルの関数についての質問ですが、 例えば、一つのセルの中に ２桁の数字が６個あるとします。 「０１ ０２ ０３ ０４ ０５ ０６」 このセルの中の数字と もう一つのセルの中の数字 「０２ ０４ ０６ ０８ ０９ １０」 この２つのセルの中の数字が何個一致しているか、個数を求めたい場合 何か良い関数がありますでしょうか？ 関数でもVBAでもどちらでも良いのですが 良い案があれば教えて頂ければ幸いです。 よろしくお願いします。
- ベストアンサー
- その他（プログラミング・開発）
- エクセルについて質問があります。
エクセルについて質問があります。 000100616013201 000100616013202 000100616013203 という数字があります。 この下2ケタ目の0を取り 「00010061601321」 「00010061601322」 「00010061601323」のようにしたいと考えています。 エクセルの表にある全ての数字の下2ケタ目は「0」の状態です。 なので、一括で簡単に消す方法を教えていただけないでしょうか。 少しだけなら計算式なども理解できます。 急いでいるので、宜しくお願い致します。
- 締切済み
- オフィス系ソフト
- エクセルのVBAに関しての質問です。
エクセルのVBAに関しての質問です。 あるセルに入力された数字の行から行までを非表示にしたいのです。 例えば、A1に15、B1に30という数字が入っていれば、行15から30を非表示する、という感じです。 よろしくお願いします。
- ベストアンサー
- その他MS Office製品
- エクセルのＶＢＡに関する質問です。
エクセルのＶＢＡに関する質問です。 仮にＡ列にＡ１からＡ１４まで（１２３４１２３１２１２３４５）と入っていて、さらにＢ列にＢ１からＢ１４まで（３８９０６４９３０８７６３９）と入っていたとします。Ａ列の（２）の隣にあるＢ列の数字はそれぞれ（８４０７）になりますよね。 この２のとなりのＢ列の数字を、Ａ列の最初から（１２３４）（１２３）（１２）（１２３４５）と１を区切りとして、Ｃ列に、２に対応していた先ほどの数字を入力したいのです。 つまりＣ列には（８８８８４４４００７７７７７）と入るようにしたいのですが、ＶＢＡド素人の私には解説書を読んでもいい知恵が浮かびません。 どなたか、ご説明か、できればＶＢＡのコピーを取らせていただけないでしょうか？ よろしくお願いいたします。
- 締切済み
- オフィス系ソフト
- エクセルVBAで計算機を作成について
エクセルVBAのユーザーフォームで計算機を作成しております。 以下の点で参考書で調べたのですが壁にぶつかっております。 1、クリアボタンを作成して押下する事によって表示さ れている数字を「0」にしたいのですが出来ません。 2、テキストBOXに表示される数字を12桁まで表示にし たいのですがMAXLENGTHを12にしても制限をかける事 が出来ません。 3、テキストBOXに数字や計算結果を表示してるのです が、手動入力を出来ない様にしたいのですが出来 ません。 非常にせっぱ詰まっていて言葉足らずかもしれませんがどなたか教えてください。
- ベストアンサー
- その他（プログラミング・開発）
- エクセルVBA ワークシート関数の使用について
エクセル2003VBA ワークシート関数の使用についての質問です よろしくお願いします。 ４桁の数字を、千の位・百の位・十の位・一の位に分解する関数ですが 例えば A1に４桁の数字があり、B1に千の位を表示する場合ですが ワークシート関数の場合 B1=MOD(INT($A$1/1000),10) となりますが VBAにてそのまま使用し Range("B1").value=Application.WorksheetFunction.MOD(INT(Range("A1")/1000),10)とするとエラーになります。 エラーになる原因は、いろいろ調べたら分かったのですが この様に、一発でB1に計算結果を入れたいのですが、どうしたらよろしいでしょうか 現在は、 Range("C1").Formula = "=MOD(INT(A1/1000),10)" Range("B1").value=Range("C1").value 一旦、C1に置き換えてから行っています。 よろしくお願いします
- ベストアンサー
- オフィス系ソフト
お礼
回答ありがとうございました。 もっとも理想的なものだと思います。 勉強にもなり、すごく感謝しております。