3

請問EXCEL如何能將不同欄位的資料整合在同一格呢

aavicky

aavicky
個人積分：346708分
文章編號：63299191

346708分

21樓

2017-02-10 13:06

sandypan1211 wrote:
=CONCATENATE...(恕刪)

Jolie H

Jolie H
個人積分：11分
文章編號：63336656

11分

樓主

2017-02-14 13:52

josephteng wrote:
是說...王子公主X...(恕刪)

請問各位大大
資料寫入會出現在第5列
新增第2筆卻又會把第一次輸入的資料蓋過不知道是不是指令上出了什麼問題>"<

Private Sub CommandButton1_Click()
Range("A2").Select
Selection.End(xlDown).Select

Sheets("LeaveApplication").Range("A" & ActiveCell.Row + 1) = cmbA.Text
Sheets("LeaveApplication").Range("B" & ActiveCell.Row + 1) = TextBox1.Text
Sheets("LeaveApplication").Range("C" & ActiveCell.Row + 1) = cmbC.Text
Sheets("LeaveApplication").Range("D" & ActiveCell.Row + 1) = cmbE.Text
Sheets("LeaveApplication").Range("E" & ActiveCell.Row + 1) = cmbF.Text
If Application.Value = TURE Then Sheets("LeaveApplication").Range("F" & ActiveCell.Row + 1) = "Application"
If Cancel.Value = TURE Then Sheets("LeaveApplication").Range("F" & ActiveCell.Row + 1) = "Cancel"

End Sub

3