Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


49626 / 76736 ←次へ | 前へ→

【32014】Re:指定した行の数と式の数字を対応させたい!
質問  kruk  - 05/12/4(日) 17:51 -

引用なし
パスワード
   かみちゃん さん、ありがとうございます。
昨日、かみちゃんさんからお教えいただいたものを活用して、

 strRow = Me.TextBox1
 MsgBox Range(strRow).Rows.Count
と、することで、テキストボックス1にA1:A100と範囲を打ち込んで、メッセージボックスに99と選択した行の数値が出るようにはなったのですが、その数値をモジュール内のsigma = Std * Sqr()という式の入れ込む方法で今は悩んでいる状況です。
以下は、先ほどのかみちゃんさんからの返答に答えたものですが、
Private Sub CommandButton1_Click()
 '〜省略〜
 Unload UserForm1 ' Meで指定されているフォームとUserForm1は異なるフォームですか? A:フォーム一緒のものです。
 With Me.TextBox1
  strRow = Me.TextBox1
  If .Value = "Range(strRow).Rows.Count" Then Exit Sub
 '〜省略〜
          ↑
" "で囲っているので、「Range(strRow).Rows.Count」という文字列とTextBox1の値を比較しています。
しかし、
  If .Value = Range(strRow).Rows.Count Then Exit Sub
としたとしても、Me.TextBox1.Value は、セル範囲を示す文字列、
Range(strRow).Rows.Count は、そのセル範囲の行数を返しますので、
必ず一致することはないと思います。←keinさんから教わったものを使ってみたの                 ですが、使用しないほうがいいのでしょう                  か?

モジュールは、
Sub Calculate(DataRange As String, OutputRangeA As String, OutputRangeB As String)
Dim Std As Single, sigma As Single
Dim RanData As Range
'〜省略〜
Call Output(Std) ← 何の処理かわかりませんが・・・
A:ユーザーフォームに値が出る場所が2つあり、これはOutputRangeAからTextBox2に標準偏差の値を出す処理です。

sigma = Std * Sqr(Mynum) ←Mynumという変数は、宣言されていません。
すいません。変数を宣言するのを忘れておりました。
何分、VBA初心者なもので、ご足労おかけいたしますが、どうぞよろしくお願いします。

0 hits

【31979】指定した行の数と式の数字を対応させたい! kruk 05/12/3(土) 14:46 質問
【31980】Re:指定した行の数と式の数字を対応させた... かみちゃん 05/12/3(土) 14:51 発言
【31981】Re:指定した行の数と式の数字を対応させた... kruk 05/12/3(土) 15:19 質問
【31982】Re:指定した行の数と式の数字を対応させた... かみちゃん 05/12/3(土) 15:32 発言
【31983】Re:指定した行の数と式の数字を対応させた... kruk 05/12/3(土) 15:37 お礼
【32007】Re:指定した行の数と式の数字を対応させた... kruk 05/12/4(日) 16:17 質問
【32008】Re:指定した行の数と式の数字を対応させた... かみちゃん 05/12/4(日) 16:57 発言
【32014】Re:指定した行の数と式の数字を対応させた... kruk 05/12/4(日) 17:51 質問
【32017】Re:指定した行の数と式の数字を対応させた... かみちゃん 05/12/4(日) 18:11 回答
【32018】Re:指定した行の数と式の数字を対応させた... kruk 05/12/4(日) 18:15 お礼
【32019】Re:指定した行の数と式の数字を対応させた... kruk 05/12/4(日) 19:04 質問
【32020】Re:指定した行の数と式の数字を対応させた... かみちゃん 05/12/4(日) 19:14 発言
【32043】Re:指定した行の数と式の数字を対応させた... kruk 05/12/5(月) 13:30 お礼
【31984】Re:指定した行の数と式の数字を対応させた... Kein 05/12/3(土) 15:38 回答

49626 / 76736 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free