المسلم العربي قام بنشر يوليو 17, 2017 مشاركة قام بنشر يوليو 17, 2017 أرجوالمساعدةعلى ايجاد أكواد لتصميم البرنامج الموضح اسفله و أتمنى أن لا تكون الأكواد مرتبطة بخلايا في الاكسل Offecena.rar رابط هذا التعليق شارك More sharing options...
ياسر العربى قام بنشر يوليو 17, 2017 مشاركة قام بنشر يوليو 17, 2017 تفضل اخي الكريم لعله المطلوب لم اجرب كل القيم يرجى التأكد من النتائج تحياتي Offecena.rar رابط هذا التعليق شارك More sharing options...
ياسر العربى قام بنشر يوليو 17, 2017 مشاركة قام بنشر يوليو 17, 2017 وأرى انك لا تريد العمل على الشيتات وكأنك تريده برنامج تنفيذي تفضل البرنامج تنفيذي تحياتي Project1.rar رابط هذا التعليق شارك More sharing options...
المسلم العربي قام بنشر يوليو 17, 2017 الكاتب مشاركة قام بنشر يوليو 17, 2017 والله العظيم كيف أشكرك لا استطيع شكرك لكنني ليس بمعنى أريد برنامج تنفيذي و لكن أريد ظهور اليوزفورم مباشرة بعد اقلاع الاكسل و أردت الأكواد كيف اصمم برنامجي و أتعلم في نفس الوقت و لذلك أشكرك و أتمنى أن تساعدني في تطويره لأنه الحساب البريدي الجزائري له مفتاح كما حسابناه في هذا البرنامج و له مفتاح أخر اسمه RIP له طريقة حسابية أود تطويرها لبرنامج و شكرا أخي ياسر العربي رابط هذا التعليق شارك More sharing options...
المسلم العربي قام بنشر يوليو 17, 2017 الكاتب مشاركة قام بنشر يوليو 17, 2017 أرجو التوضيح ؟؟؟؟؟؟؟؟؟ رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر يوليو 18, 2017 مشاركة قام بنشر يوليو 18, 2017 جرب الكود التالي عله يفي بالغرض Private Sub CommandButton4_Click() Dim i As Long Dim c As Long Dim x As Long Dim k As Long x = 11 For i = 1 To 8 c = c + (Me.Controls("TextBox" & i).Value * x) x = x - 1 Next i k = c Mod 100 UserForm2.TextBox10 = k UserForm1.Hide UserForm2.Show 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.