PDA

توجه ! این یک نسخه آرشیو شده میباشد و در این حالت شما عکسی را مشاهده نمیکنید برای مشاهده کامل متن و عکسها بر روی لینک مقابل کلیک کنید : پرینت



blue_cry
2012/08/27, 10:31
ممنون از کمک های همتون تونستم چیزی رو که میخواستم درست کنم حالا هر اسمی رو که از data validation انتخاب میکنم داده هاش هم میشینه تو جدول انتخابیم

اما برای پرینت گرفتنش باید تک تک اسم ها رو انتخاب کنم پرینت بزنم
راهی هست که بتونم همه اسمها رو یکجا پرینت بگیرم؟
مثلا وقتی پرینت میزنم اسم اول بشینه پرینتش بیاد بیرون بعد اسم دوم .... دیگه هی انتخاب نکنم

blue_cry
2012/08/27, 16:26
سلام راهش رو پیدا کردم



Sub Printall()
Dim x As Integer
For x = 2 To 79
Range("B9").Value = Sheets(1).Cells(x, 1).Value
ActiveSheet.PrintOut
Next x
End Sub



B9 همون سلولی هست که data validation خورده
بعد از مساوی value هم آدرس که شیت 1 و column a:a هست
جلوی for هم از 2-79 هم که ردیف ستون a شیت 1 هست
نمیدونم تونستم توضیح بدم یا نه