Sắp xếp các số trong cột (1 người xem)

[huynhthanhxd2]

Em có cột F có các giá trị
F1 : 1
F2 : 2
F3 : 3
F500 : 500
giờ em muốn tạo cột G với các giá trị được sắp xếp lộn xộn không theo quy luật nào thì sao ạ. tức là cột G giá trị ko tăng đều như F mà nó đặt không theo quy luật. tks các bác

 

[Quang_Hải]

Em có cột F có các giá trị
F1 : 1
F2 : 2
F3 : 3
F500 : 500
giờ em muốn tạo cột G với các giá trị được sắp xếp lộn xộn không theo quy luật nào thì sao ạ. tức là cột G giá trị ko tăng đều như F mà nó đặt không theo quy luật. tks các bác

Không theo quy luật nào hết thì mắc mớ gì tới cột F chứ

Sub taoso_ngaunhien()
Dim dic As Object, I, somoi
Set dic = CreateObject("scripting.dictionary")
   With dic
      For I = 1 To 500
start:
         Randomize
            somoi = Int((500 * Rnd) + 1)
         If Not .exists(somoi) Then
            .Add somoi, ""
         Else
            GoTo start
         End If
       Next
   [H1].Resize(.Count, 1) = Application.Transpose(.keys)
End With
End Sub

 

[mhung12005]

Em có cột F có các giá trị
F1 : 1
F2 : 2
F3 : 3
F500 : 500
giờ em muốn tạo cột G với các giá trị được sắp xếp lộn xộn không theo quy luật nào thì sao ạ. tức là cột G giá trị ko tăng đều như F mà nó đặt không theo quy luật. tks các bác

Bạn thử áp dụng 2 hàm RAND hoặc RANDBETWEEN xem sao.