No.4
- 回答日時:
勉強がてら やってみました
相も変わらず数式ですが(^^;)
Sub A列の値をC列へランダムに並べる()
Application.ScreenUpdating = False
Dim 終わり行 As Long
終わり行 = Cells(Rows.Count, 1).End(xlUp).Row
Range("A:B").EntireColumn.Insert
Range("A1:A" & 終わり行).Formula = "=RAND()"
Range("B1:B" & 終わり行).FormulaR1C1 = "=RC[1]&"""""
Range("A1:B" & 終わり行).Value = Range("A1:B" & 終わり行).Value
Range("A1:B" & 終わり行).Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
Range("E1:E" & 終わり行).FormulaR1C1 = "=RC[-3]&"""""
Range("E1:E" & 終わり行).Value = Range("E1:E" & 終わり行).Value
Columns("A:B").Delete
Application.ScreenUpdating = True
End Sub
No.3
- 回答日時:
RAND関数はシートの関係ないセルのデータを変えても値が変わってしまう。
だから扱いにくい例えば
A,B,C,E列(結果)データ
a0.0689046655b
b0.924045921e
c0.2663099194d
d0.6410455843
e0.9200070652
この5つのA列のデータから3つ選ぶとする。
B列は乱数で、それらの各行の値の3つを選びだす仕組みとする。
E列の関数は =INDEX($A$2:$C$6,MATCH(ROW()-1,$C$2:$C$10,0),1)
これで乱数の面で良いのかどうか確信はないが。
ーー
B列は不安定なので
ボタンを設けて、クリックイベントに
Private Sub CommandButton1_Click()
For i = 2 To 6
Cells(i, "B") = Rnd()
Next i
End Sub
Rnd()の()内はいいろいろ意味があるようだからWEBででも調べて。
No.1
- 回答日時:
たとえばデータとして
A列に1から10までの数値
B列にランダムに表示させたいデータ
と入力しておき
表示させたいセに(A列とB列は除く)
=VLOOKUP(INT(RAND()*(10-1)+1),A:B,2,FALSE)
としてください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルの散布図で新たに入力した値のデータラベルが空欄になる現象 1 2022/04/26 09:31
- Excel(エクセル) セルの上書き禁止について 5 2022/04/02 10:09
- Visual Basic(VBA) エクセルVBAについて 2 2023/01/31 16:21
- Excel(エクセル) エクセル表作成について 5 2023/03/12 13:25
- Excel(エクセル) Excelでnullになるような式のセルをマクロで空白行と認識させるにはどうすればいいですか? 3 2023/03/13 13:42
- Excel(エクセル) エクセルの昇順での数値入力のミスの見つけ方を教えてください。 4 2022/06/26 20:41
- Excel(エクセル) [オートフィルター]機能について 3 2023/02/04 14:32
- Excel(エクセル) 列の複数ある空白セルを飛ばして、セルに並べて表示したい 3 2023/02/12 16:49
- Excel(エクセル) WORKDAY関数 4 2023/06/08 13:23
- Visual Basic(VBA) VBA 「,」・空白・カタカナ等の複数条件のマクロ 2 2023/08/23 11:57
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
エクセル指定した範囲からランダムで一つ抽出
Excel(エクセル)
-
Excelで事前にセルに入力した言葉をランダムに表示
Windows Vista・XP
-
表(リスト)からランダムに抽出するには?
Excel(エクセル)
-
-
4
エクセルで複数のセルにあらかじめ用意した単語を重複せずにランダム表示させる方法
Excel(エクセル)
-
5
エクセルに入力されたリストから単語をランダムに表示する関数ってありますか?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルVBA、別ブックへ転記す...
-
エクセルのデーターが2か月前の...
-
エクセル共有したが、アクセス...
-
エクセル②
-
エクセルの計算
-
【マクロ】顧客番号にて一致さ...
-
エクセルを使っていて2024/5/15...
-
(マクロ)データをAブックからB...
-
Microsoft 365の Excel を使用...
-
エクセルで日付を数字+アルフ...
-
Excel
-
Excelでセルの値が同じか...
-
エクセル 文字を増やしたい。
-
UNIQUE関数が使えないバージョ...
-
指定文字の間に
-
Googleスプレッドシートでファ...
-
エクセルで年休を管理する方法...
-
Microsoft365に変えたのですが...
-
エクセルの暗号化なしのバーの...
-
Excelで縦軸の書式を0:00形式の...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
[関数得意な方]教えて下さい・...
-
Excelにてある膨大なデータを管...
-
[関数について]わかる方教えて...
-
Excel初心者です。 詳しい方、...
-
excelの不要な行の削除ができな...
-
エクセル関数に詳しい方教えて...
-
INDIRECTを使わず excelで複数...
-
[オートフィルタ]で抽出された...
-
エクセルの神よ、ご回答を! エ...
-
エクセル関数に詳しい方、教え...
-
各ページの1番上の表示について
-
Excelで写真のような表を作った...
-
エクセルで不等号記号(≠)が上に...
-
数学 Tan(θ)-1/Cos(θ)について...
-
Excel 2019 は、SPILL機能があ...
-
Excelで全角を半角にしたいので...
-
条件付き書式を教えてください
-
Excel フィルターを掛けた状態...
-
[オートフィルタ]の適用範囲の...
おすすめ情報