dah_med قام بنشر مايو 7, 2013 مشاركة قام بنشر مايو 7, 2013 السلام عليكم عندي فوائم لمؤسسات متفاوتة الأسطر وأريد ختم المدير الذي هو عبارة عن صورة مدرجة أن ينزل ويصعد حسب طول القائمة بعبارة أخرى الختم يتابع التاريخ وكلمة مدير التربية أخوكم محمد Conv_2013 _Disen.rar رابط هذا التعليق شارك More sharing options...
أفضل إجابة طارق محمود قام بنشر مايو 8, 2013 أفضل إجابة مشاركة قام بنشر مايو 8, 2013 السلام عليكم أخي العزيز بالمرفق كود سيجعل الختم يتبع الخلية التي بها عبارة "مدير التربية" بشرط ان تكون تلك العبارة في آخر الصف من إحدي الأعمدة الثماني الأولي الكود في حدث الورقة وهو Private Sub Worksheet_Change(ByVal Target As Range) a = Target.Address Shapes("Image 4").Select Selection.Cut For C = 1 To 8 Cells(9999, C).End(xlUp).Select If ActiveCell.Value = "مدير التربية" Then GoTo 10 Next C 10 ActiveSheet.Paste With Selection.ShapeRange .IncrementLeft 8 .IncrementTop -9 End With Range(a).Select End Sub Conv_2013 _Disen_1.rar رابط هذا التعليق شارك More sharing options...
dah_med قام بنشر مايو 8, 2013 الكاتب مشاركة قام بنشر مايو 8, 2013 السلام عليكم أخي طارق جزاك الله كل خير أخوك محمد رابط هذا التعليق شارك More sharing options...
الردود الموصى بها