توجه ! این یک نسخه آرشیو شده میباشد و در این حالت شما عکسی را مشاهده نمیکنید برای مشاهده کامل متن و عکسها بر روی لینک مقابل کلیک کنید : ایجاد پیغام هنگام باز شدن اکسل
سلا
برای اینکه هر وقت فایل اسکل رو باز کردین یک پیغام بیاد این کد رو در workbook ذخیره کنید
Private Sub Workbook_Open()
Msgbox "Welcome"
End Sub
خیلی ممنون واقعا عالی بود
yamahdi13601982
2015/11/06, 19:13
با سلام و خسته نباشید.من دنبال ماکرویی میگردم که با توجه به شماره فاکتور ؛ شیت رو تولید کنه و اگه این شیتی که میخواد تولید کنه از قبل وجود داشته باشه پیغام بده که تکراری هستش.با تشکر
iranweld
2015/11/06, 20:32
با سلام
فایل پیوست بسته به دیتای موجود در ستون A شیت ایجاد مینماید و در صورت موجود بودن پیغام میدهد
Private Sub CommandButton1_Click()
Dim i As Integer, blnFound As Boolean
y = Sheet1.Cells(Sheet1.Rows.Count, "A").End(xlUp).Row
With ThisWorkbook
For j = 1 To y
blnFound = False
For i = 1 To .Sheets.Count
If .Sheets(i).Name = Sheet1.Range("a" & j).Value Then
blnFound = True
MsgBox "sheet: " & .Sheets(i).Name & " ready"
End If
Next i
If blnFound = False Then
.Sheets.Add After:=Sheets(Sheets.Count)
With ActiveSheet
.Name = Sheet1.Range("a" & j).Value
End With
End If
Next j
End With
Sheet1.Select
End Sub
yamahdi13601982
2015/11/07, 17:05
مرسی از لطفتون-همونیه که میخواستم:min18:
yamahdi13601982
2015/11/13, 17:25
با سلام و خسته نباشید خدمت اساتید محترم میخواستم بدونم چطوری میتونم به یه کلید بگم که مثلا تو سلول a1 اسم همین کار پوشه ای رو که توش هستم بنویسه
yamahdi13601982
2015/11/13, 17:27
و اینکه چرا من نمیتونم تو این پست موضوع جدیدی رو بنویسم؟
Ali Parsaei
2015/11/13, 21:48
و اینکه چرا من نمیتونم تو این پست موضوع جدیدی رو بنویسم؟
لطفا" براي هر سوالتان پست جديدي ايجاد کنيد (البته قبلش در سايت جستجو کنيد و ببينيد قبلا" مشابه سوال شما مطرح نشده باشد) اين طوري کساني که بعدا" به سايت مراجه مي کنند و يا خودمان اگر بعدها به سايت مراجعه کنيم خيلي راحت مي توانيم دنبال موضوعات بگرديم، وگرنه اصلا" يک پست ايجاد مي شد و تا آخر همه سوالاتشان را داخل آن مي نوشتند!;)
دوست عزیز اسپارتان میشه نمونه بزاری لطفا.
Amir Ghasemiyan
2016/03/29, 19:05
دوست عزیز اسپارتان میشه نمونه بزاری لطفا.
خدمت شما دوست عزیز
vBulletin® v4.2.5, Copyright ©2000-2024, Jelsoft Enterprises Ltd.