【Excel VBA 教學】23 在儲存格內寫入公式與填滿公式 ... Advanced excel( vba ) tutorial 5 : Dim, Public, Private & Global Keywords. ... <看更多>
vba dim數字 在 VBA Dim-在PTT/IG/網紅社群上服務品牌流行穿搭-2022-08 ... 的美食出口停車場
在VBA中,對數字型態做宣告的寫法如下: Dim A as Integer 若是想宣告常數: Public Const A as Integer = 42 但寫作程式過程中,總是會有想偷懶的時候,這時候簡寫 . ... <看更多>
vba dim數字 在 (6/28 小更新)Excel多組數字挑選加總為指定數值的方法(vba 範例) 的美食出口停車場
(6/28 小更新)Excel多組數字挑選加總為指定數值的方法(vba 範例). 前往頁尾 ... Dim total As Long, i As Integer, ok As Integer, target As Double, ... ... <看更多>
vba dim數字 在 [問題] VBA字串排列組合問題- 看板Office - 批踢踢實業坊 的美食出口停車場
軟體:excel VBA
版本:2016
問題:總共有六欄項目(G~L),每欄各有3~8項不等資料,
想要做C6取2、C6取3、C6取4、C6取5、C6取6
寫了C6取2,卡在不知道如何排除重複的資料....有請版上大神指點迷津...搞一天惹...Orz
檔案:
Sub oneAoneC()
Dim Ante1 As Range
Dim 組合結果 As Range
Dim xStr As String
Dim xFN1, xFN2, xFN3 As Integer
Dim xSV1, xSV2, xSV3 As String
Worksheets("工作表").Activate
Set Ante1 = Range("A2:A34")
xStr = "-" 'Separator
Set 組合結果 = Range("E2")
For xFN1 = 1 To Ante1.Count
xSV1 = Ante1.Item(xFN1).Text
For xFN2 = 1 To Ante1.Count
xSV2 = Ante1.Item(xFN2).Text
組合結果.Value = xSV1 & xStr & xSV2
Set 組合結果 = 組合結果.Offset(1, 0)
Next
Next
End Sub
--
▉╯╰ ▅▃▂ ▂ ▏ ╱ ╱ ╱
█ ╮╭ ▆▅ ▂▅▆ ▎ ╱ █ ╱ ╱ █ ╱
▉ ◢▋ ▄▄ ▉ ◢▋ ╱ ████████████
▉ ▆█◤ ▊ ▎ ▉ ▆█◤ ╱ ╱
█ █ ▋ ▍ ▎ █ ████████████
▉ █ ▅▅ ▏ █ █ █"冰的啦"
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 36.230.94.14 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1671287160.A.B93.html
... <看更多>