نوشته اصلی توسط
saeid_f
با سلام و وقت بخیر
من خیلی به این ماکرو نیاز دارم برای جمع بندی نظرات کاربران شرکت کننده در یک کارگاه آموزشی
فقط بی زحمت بفرمایید که چطور میتونیم این ماکرو رو برای جمع چندین سلول متفاوت دیگر استفاده کنیم.
این ماکرو میتونه همه سلول های a1 موجود در تمامی فایل ها رو جمع کنه و در سلول b2 فایل sum جمع کنه
من میخوام :
الف -تمامی سلول های a1 رو در b2
ب- تمامی سلول های a2 رو در b3
ج - تمامی سلول های a3 رو در b4
و هر چند سلول رو که خواستم جمع کنه
ممنون
با این کد کلیه شیت های فایلهای مقصد مورد برسی قرار گرفته و سلولهای A1,A2,A3هر شیت در جمع لحاظ میگردد
کد PHP:
Private Sub CommandButton1_Click()
Static total1, total2, total3 As Integer
Dim directory As String, fileName As String, sheet As Worksheet, I As Integer
total1 = 0
total2 = 0
total3 = 0
Application.ScreenUpdating = False
directory = "E:\test\"
fileName = Dir(directory & "*.xl??")
Do While fileName <> ""
Workbooks.Open (directory & fileName)
For I = 1 To Sheets.Count
total1 = total1 + Sheets(I).Range("A1")
total2 = total2 + Sheets(I).Range("A2")
total3 = total3 + Sheets(I).Range("A3")
Next
Workbooks(fileName).Close
fileName = Dir()
Loop
Application.ScreenUpdating = True
Range("B2") = total1
Range("B3") = total2
Range("B4") = total3
End Sub
علاقه مندی ها (Bookmarks)