1. excel 宏代碼問題 rng.Offset(0, -1) = Application.Evaluate(rng.Text)高手來
Sub 批量保存TXT()
Dim Rng As Range
Dim obj, blogTxt
a=[a30000].end(3).row
For Each Rng In Range("A2:A" & a)
Myname = Rng
MyText = Rng.Offset(0, 1)
Set obj = CreateObject("scripting.filesystemobject")
Set blogTxt = obj.OpenTextFile(ThisWorkbook.Path & "\" & Myname & ".txt", 8, True)
blogTxt.Write MyText & vbCrLf
blogTxt.Close
Set obj = Nothing
Set blogTxt = Nothing
Next
End Sub
2. morng noong中文意思
Hong Kong
[英][ˈhɔŋˈkɔŋ, -ˌkɔŋ, ˈhɔ:ŋˈkɔ:ŋ, -ˌkɔ:ŋ]
[美][ˈhɑŋˈkɑŋ, -ˌkɑŋ, ˈhɔŋˈkɔŋ, -ˌkɔŋ]
n.香港;
例句：
Shares will be listed in hong kong and shanghai.
農業銀行股票將同時在香港和上海證交所上市。
3. vba中代碼：Replace(cells(1,rng.column).address(0,0),1,"")是啥意思呀
替換單元格（位於第一行，rng所在列）的相對地址中的數字1變成空。
實現的效果，其實就是提取rng所在列的索引
例如：rng是AB3，則這段代碼得到AB
4. RNG random_generator(getTickCount())這段代碼什麼意思
不一樣，rng 是控制隨機數生成的。random 是用來生成隨機數的。
如果你想讓每次生成的隨機數都一樣（比如為了調試，或者對比），才需要用 rng 控制。否則一般用不上 rng 這個函數。
5. VBA 代碼問題
代碼不全，只能分析出下面的意思：這段代碼的目的是在某一單元格區域（估計是某一列）內查找與某個內容相同的所有單元格，然後填充為綠色。
第一句是判斷如果查找到了單元格Rng，就將這個單元格地址記錄下來（第2行），然後進入Do循環將與某內容相同的所有單元格查找出來填充為綠色，這代碼的寫法是很精練完美的，只是循環的條件語句的兩個條件中有一個多餘的，這句可改為：
Loop While Rng.Address <> FindAddress
如果要想將While條件改到Do後面，代碼會變得很復雜，完全沒有這個必要。
6. Excel VBA中rng(1, 2),表示什麼意思
rng是一個你自己定義的一個二維數組，rng(1,2)表示為1行2列，就象表格中的 B2
7. 互聯網金融概念股都有哪些股票
你可以直接在炒股軟體裡面查找相應的板塊的。如果還有個股問題，推薦關注nrng001。可直接向牛人提問。
8. Private Sub CommandButton1_Click() Dim rng As Range, c As Range Dim k As Integer Set rng = [f9:p14]
Private Sub CommandButton1_Click()
Dim rng As Range, c As Range
Dim k As Integer
Set rng = [f9:p14]『設置rng為f9到p14所有單元格對象
For Each c In rng』循環整個rng對象
c = Int(Rnd() * 14 + 4) '隨機一個4-14之間的數賦值給c
k = k + 1 '變數自身累加1
If k >= [d21] Then Exit For '如果k大於等於 單元格d21就退出循環
Next
End Sub