سلام در فایل پیوست یک shape وجود داره به نام Picture 4
چطور میشه با کدنویسی اونو delete کرد البته شماره Picture ممکنه هر باری فرق بکنه
ممنون
چطور میشه با کدنویسی اونو delete کرد البته شماره Picture ممکنه هر باری فرق بکنه
ممنون
-
-
سلام دوست عزیز
این کد میاد اولین Shape ای که اسمش با Picture شروع شده باشه رو پاک میکنه:
کد PHP:For i = 1 To Me.Shapes.Count
If Me.Shapes(i).Name Like "Picture *" Then
Me.Shapes(i).Delete
Exit For
End If
Next i
[CENTER][COLOR=#696969][FONT=lucida console]... [B]Programming [/B]C# - VB.Net - VC++ - ASP.Net - HTML - CSS - JS - AS2 - AutoIt - Pascal - Delphi - PHP - Python - VBA - Etc
[/FONT][/COLOR][SIZE=2][FONT=lucida console][COLOR=#808080]... 2D & 3D [B]Graphic Designer[/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] 2D & 3D [B]Animator [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Game [/B]Designer & [B]Hacker [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] Data [B]Forensic [/B]Expert [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Ethical [/B]Hacker [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Pen[/B] Tester
[/COLOR][/FONT][/SIZE][COLOR=#ff0000][FONT=courier new][SIZE=4][B].: Expert in doing what nobody else can :.[/B][/SIZE][/FONT][/COLOR][/CENTER] -
سلام گد خطا توی کلمه me میده اگر ممکنه کد توی فایل بدین ممنون میشم .کامنت
-
سلام دوست عزیز
کد باید داخل Event نوشته بشه که ارور نده
الان توی این فایل من داخل Event عوض شدن سلول انتخابی گذاشتم
الان اگه 100 تا عکس وارد کنید داخل این فایل با 100 بار عوض کردن سلول انتخابی (100 بار کلیک روی سلولهای مختلف یا 100 بار با کلیدهای جهت نما توی شیت حرکت کردن) از اولین عکس دونه دونه پاک میشن[CENTER][COLOR=#696969][FONT=lucida console]... [B]Programming [/B]C# - VB.Net - VC++ - ASP.Net - HTML - CSS - JS - AS2 - AutoIt - Pascal - Delphi - PHP - Python - VBA - Etc
[/FONT][/COLOR][SIZE=2][FONT=lucida console][COLOR=#808080]... 2D & 3D [B]Graphic Designer[/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] 2D & 3D [B]Animator [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Game [/B]Designer & [B]Hacker [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] Data [B]Forensic [/B]Expert [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Ethical [/B]Hacker [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Pen[/B] Tester
[/COLOR][/FONT][/SIZE][COLOR=#ff0000][FONT=courier new][SIZE=4][B].: Expert in doing what nobody else can :.[/B][/SIZE][/FONT][/COLOR][/CENTER]کامنت
-
ممنون و سپاس فراوانکامنت
کامنت