祝大家狗年大吉

春節快樂

公眾號自運營以來，得到了大家的廣泛認可。收到了好多小夥伴在後台的留言支持。在此特別感謝！

春節到了，翰博在這裡祝249位關注的小夥伴春節快樂！

對於一個技術宅，除夕夜也想用VBA給大家一個特別的推送。

煙花鞭炮的氛圍中，給大家用VBA做了一個新年禮物。

GIF

新的一年也希望大家繼續支持關注本公眾號。

祝大家新的一年事業更上一層樓！

新的一年VBA水平更上一層樓！

源碼奉上：

Sub er()

num = Worksheets(2).Range("a1").End(xlDown).Row

num1 = Int((num * Rnd) + 1)

Worksheets(1).Cells(6, "k") = Worksheets(2).Cells(num, 1)

Worksheets(1).Cells(10, "i") = Worksheets(2).Cells(num, 2)

Worksheets(1).Cells(10, "o") = Worksheets(2).Cells(num, 3)

End Sub

附件鏈接：https://pan.baidu.com/s/1c4cwO9a密碼：cms5

喜歡這篇文章嗎？立刻分享出去讓更多人知道吧！