標題: [發問] 列印的巨集。。如何修改。。 [打印本頁]

---

作者: powerlink77    時間: 2011-11-27 16:45     標題: 列印的巨集。。如何修改。。

本帖最後由 GBKEE 於 2011-11-27 16:47 編輯

我有一個ＥＸＣＥＬ檔，列印是可以用選擇日期來列印所需的報表
但。。同事已離職。。
我功力不夠，能否幫看一下。。要如何修改及其意義如Cells(3, 10)啥意思。？。。

Private Sub click_取消_Click()
UserForm1.Hide
End Sub

Private Sub click_確定_Click()
Dim D55 As Integer
Dim D11 As Integer
Dim D21 As Integer
D11 = (ComboBox2.Value - ComboBox1.Value)
For D21 = 0 To D11
Worksheets("日報表").Cells(3, 10).Value = (D21 + ComboBox1.Value)
ActiveWindow.SelectedSheets.PrintOut COPIES:=1, COLLATE:=True
Next D21
UserForm1.Hide
End Sub


Private Sub ComboBox1_Change()
Dim D44 As Object
SETD44 = ComboBox1.Value
End Sub

Private Sub ComboBox2_Change()

End Sub

Private Sub UserForm_Click()

End Sub

---

作者: GBKEE    時間: 2011-11-27 16:55

回復 1# powerlink77
要如何修改 :  如何修改 要附檔說清楚
如Cells(3, 10)啥意思  : Cells(列, 欄)的位置     Range( "B10" ) -> Cells(10, 2)  或 Cells(10, "B")      
其餘的 多看看就知道

---

作者: powerlink77    時間: 2011-11-27 17:01

哈哈！！行家一出手就解決了＠＠
如Cells(3, 10)啥意思  : Cells(列, 欄)的位置<------了解！！！
謝謝！！！！！

---

作者: thps51134    時間: 2011-11-29 10:23

回復 3# powerlink77

　　拿個好東西給你看看　學習Excel VBA的一些基本概念
版主出品必屬佳作（笑）

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)