پرینت اطلاعات هر ردیف در یک فرم ثابت

Collapse
X
Collapse
 
  • صفحه از 1
  • زمان
  • نمایش
حذف همه
new posts
قبلی template بعدی
  • amir0914

    • 2015/09/20
    • 67
    #1

    پرینت اطلاعات هر ردیف در یک فرم ثابت

    سلام و خسته نباشید. من یکسری ردیف دارم و یک فرم ثابت هم طراحی کردم و هر ردیف رو میخوام در فرم در سلول های مشخص قرار بده و به ترتیب پرینت کنه. ممنون میشم از دوستان کمکم کنن.
    برچسب ها: هیچ‌کدام
    • amir_ts

      • 2015/03/17
      • 1247
      #2
      با سلام
      دوست عزیز پیشنهاد میکنم این لینک رو ملاحظه کنید.

      استفاده از word و excel برای ایجاد تعداد زیادی فرم
      [SIZE=7][B][COLOR=navy][FONT=IranNastaliq]ای برادر تو همه اندیشه ای[/FONT][/COLOR][/B][/SIZE]

        کامنت

        • amir0914

          • 2015/09/20
          • 67
          #3
          خیلی ممنون. با کدهای vba میشه همین کار رو تو اکسل انجام داد؟ یعنی دیگه تو word نریم.

            کامنت

            • amir_ts

              • 2015/03/17
              • 1247
              #4
              گر چه با توجه به ویژگی های و قابلیت ها، گزینه mailings رو ترجیح میدم ولی میتونید برای نمونه کد زیر رو امتحان کنید.
              کد:
              [LEFT]
Private Sub CommandButton1_Click()
Dim eRow, lr As Long
Sheet1.Activate
lr = WorksheetFunction.CountA(Range("A:A"))
eRow = 2
Do While eRow <= lr
On Error Resume Next
 TextBox1.Value = Cells(eRow, 1).Value
 TextBox2.Value = Cells(eRow, 2).Value
 TextBox3.Value = Cells(eRow, 3).Value
 TextBox4.Value = Cells(eRow, 4).Value
 UserForm1.PrintForm
 eRow = eRow + 1
Loop
End Sub
[/LEFT]
              فایل های پیوست شده
              [SIZE=7][B][COLOR=navy][FONT=IranNastaliq]ای برادر تو همه اندیشه ای[/FONT][/COLOR][/B][/SIZE]

                کامنت

                قبلی template بعدی
                چند لحظه..