yes that macro will search wether surname is blank or.
it will print till blank surname. (from 5th row to blank surname). if you
want some other way, i will send you mail.

"milos" wrote:

thanx a lot.
is it possible to make a macro that makes automatically buttons with this
macro for all cases (f.e.1000 cases)?
Milos

Muhammed Rafeek M pÃ*Å¡e:

hi
i have repliyed ur mail. here also u can find the macro which i used:
donnot forget to put rate

Sub PrintForm()
Dim i As Long
i = 5
Sheets("list").Select
Do While Trim(Range("B" & i).Value) < ""
Sheets("Form No.1").Range("B6").Value = UCase(Range("B" & i).Value)
Sheets("Form No.1").Range("B7").Value = UCase(Range("C" & i).Value)
Sheets("Form No.1").Range("B8").Value = UCase(Range("D" & i).Value)
Sheets("Form No.1").Range("B9").Value = UCase(Range("E" & i).Value)
Sheets("Form No.1").Range("B10").Value = UCase(Range("F" & i).Value)
Sheets("Form No.1").Range("B11").Value = Range("G" & i).Value
Sheets("Form No.1").Range("B12").Value = Range("H" & i).Value
Sheets("Form No.1").Range("B14").Value = UCase(Range("I" & i).Value)
Sheets("Form No.1").Range("B15").Value = Range("J" & i).Value
i = i + 1
Sheets("Form No.1").PrintOut
Sheets("Form No.1").Range("B6:B15").Value = ""
Loop
End Sub

"milos" wrote:

I have some little experience with macros, so I don't mind.
I'm sending you e-mail with the table (just a moment please, have to
translate it in English)
Thank you.
Milos

Muhammed Rafeek M pÃ*Å¡e:

Hi
do you want with macro or without macro? it is possible with macro or
without. however do mail me with your file to

"milos" wrote:

Hi, i have this table in one sheet
Name Surname Adress Tel.No. E-mail Gender
Paul Gaultier Baker st 9995 M
John Smith Rose st. 5556 F

And in another sheet I have couple of forms (application forms,
questionnaires)
Applc. form. No.1
Name: Surname:
Adress:
E-mail:
Gender:

My wish is, to have buttons (or functions) next to each name, that will
print each form with data of this person put in right boxes of the forms.
Name Surname Adress Tel.No. E-mail Gender Print Form
Paul Gaultier Baker st 9995 M Print Form No.1
John Smith Rose st. 5556 F Print Form No.1

I can have the forms in word or excel format. Mailmerge doesn't solve my
problem, because that I'll need to make many steps (open file, use filter,
print it, ...).
All I need is one button for each form next to each case.
Is it possible?