1樓:夜空裡的守望者
樓主,你好!這個是沒法使用函式公式解決的,還是建議樓主使用vba程式進行處理。(由於wps個人免費版不能使用vb功能,那就改用其他版本進行處理)
(一)vba程式**如下:(寫**不易,望笑納)
sub zuhe_***()
dim i1, i2, i3, myarray(100), str, rn
on error resume next
set mysheet1 = thisworkbook.worksheets("sheet1")
mysheet1.range("h1:h1000") = ""
for i1 = 1 to 1000
str = ""
randomize '初始化隨機數
erase myarray '初始化陣列
for i2 = 1 to 7
if mysheet1.cells(i1, i2) <> "" then
for i3 = 0 to 1000000
rn = int(rnd() * 7 + 1) '生成1-7的隨機數
if ubound(filter(myarray, rn)) <> 0 then '如果生成的隨機數不重複,則
myarray(i2) = rn
str = str & mysheet1.cells(i1, rn)
exit for
end if
next
end if
next
mysheet1.cells(i1, 8) = str
next
end sub
(二)程式的執行結果如下截圖:
【注】程式執行之前請做好資料備份,以免丟失。
2樓:小龍崇者
有些複雜,最好不要難為公式。
如何將多個單元格中的資料放在乙個單元格
如果h1 h2 h3為文字資料,那麼在h1單元格插入乙個單元格,然後在h1單元格輸入以下公式。phonetic h2 h4 將h2 h4單元格的文字資料合併到一起 然後複製h1,選擇性貼上 為 數值 後,刪除h2 h4單元格,即可。多個單元格怎麼排列的?上傳帶行列號的有資料示例的 截圖,清楚說明已知...
如何將excel單元格中的特定內容移到另一單元格
蘇延佟佳靖之 假設公式針對a2單元格中的資料。配線側 b2單元格中所用公式為 mid a2,find 配線側 a2 6,find 主幹側 a2 find 配線側 a2 7 主幹側 c2單元格中所用公式為 right a2,len a2 find 主幹側 a2 5 這麼複雜?選中單元格進行單元格複製貼...
excel,如何將多個單元格的內容合併到單元格中
閭丘齊夏銘 可以用公式 a1 a2 如果單元格中資料為文字,並不是有公式得到的,還可以用公式 a1到a100單元格的資料合併 phonetic a1 a100 貴菊求丹寒 假設是a1,b1,c1,d1四個單元格內容合併到e1單元格,則e1單元格寫入公式 a1 b1 c1 d1 或 concatena...