vba：判斷行位置

code：

使用範例：

'先設定需要用的表頭資訊

tag=Array("代號", "日期", "外資張數", "外資D3D", "外資D5D") 

'透過副程式取的需要使用的表頭英文字母代號

ROW_OUT = ROWS_CHECK("sheet1", 5) 

ROW_OUT = Split(ROW_OUT, "@")

SHEET_NAME = "sheet1"

'寫入表頭資料

Sheets(SHEET_NAME).Range(ROW_OUT(0) & 1 & ":" & ROW_OUT(1) & 1) = tag