المسلم العربي قام بنشر يوليو 17, 2017 قام بنشر يوليو 17, 2017 أرجوالمساعدةعلى ايجاد أكواد لتصميم البرنامج الموضح اسفله و أتمنى أن لا تكون الأكواد مرتبطة بخلايا في الاكسل Offecena.rar
ياسر العربى قام بنشر يوليو 17, 2017 قام بنشر يوليو 17, 2017 تفضل اخي الكريم لعله المطلوب لم اجرب كل القيم يرجى التأكد من النتائج تحياتي Offecena.rar
ياسر العربى قام بنشر يوليو 17, 2017 قام بنشر يوليو 17, 2017 وأرى انك لا تريد العمل على الشيتات وكأنك تريده برنامج تنفيذي تفضل البرنامج تنفيذي تحياتي Project1.rar
المسلم العربي قام بنشر يوليو 17, 2017 الكاتب قام بنشر يوليو 17, 2017 والله العظيم كيف أشكرك لا استطيع شكرك لكنني ليس بمعنى أريد برنامج تنفيذي و لكن أريد ظهور اليوزفورم مباشرة بعد اقلاع الاكسل و أردت الأكواد كيف اصمم برنامجي و أتعلم في نفس الوقت و لذلك أشكرك و أتمنى أن تساعدني في تطويره لأنه الحساب البريدي الجزائري له مفتاح كما حسابناه في هذا البرنامج و له مفتاح أخر اسمه RIP له طريقة حسابية أود تطويرها لبرنامج و شكرا أخي ياسر العربي
ياسر خليل أبو البراء قام بنشر يوليو 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
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.