ajore قام بنشر ديسمبر 15, 2014 مشاركة قام بنشر ديسمبر 15, 2014 textbox1 = sum range("a1:a100 كيف انفذ هذا في الفورم :) رابط هذا التعليق شارك More sharing options...
عبد الله بولنوار قام بنشر ديسمبر 15, 2014 مشاركة قام بنشر ديسمبر 15, 2014 غير واضح رابط هذا التعليق شارك More sharing options...
ابو تراب قام بنشر ديسمبر 15, 2014 مشاركة قام بنشر ديسمبر 15, 2014 بعد اذن اخي عبدالله هل تقصد كما هو في الكود التالي: Private Sub Worksheet_Change(ByVal Target As Range) UserForm1.TextBox1.Text = WorksheetFunction.Sum(Range("A1:A100")) End Sub انظر المرفق Text.zip رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر ديسمبر 15, 2014 مشاركة قام بنشر ديسمبر 15, 2014 أخي العزيز TextBox1.Value = WorksheetFunction.Sum([A1:A100]) تفضل form1.rar رابط هذا التعليق شارك More sharing options...
ajore قام بنشر ديسمبر 15, 2014 الكاتب مشاركة قام بنشر ديسمبر 15, 2014 أخي العزيز TextBox1.Value = WorksheetFunction.Sum([A1:A100]) تفضل بالضبط اخي - يجزيك الخير .. ولكن اذا اردت ان يأخد البيانات من صفحة محددة ؟!! رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر ديسمبر 15, 2014 مشاركة قام بنشر ديسمبر 15, 2014 تفضل أخي Private Sub UserForm_Activate() Me.TextBox1.Value = WorksheetFunction.Sum(Sheets("Sheet1").Range("A1:A100")) End Sub رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.