Thread
:
Vlookup and print loop
View Single Post
#
1
Posted to microsoft.public.excel.programming
MM User
external usenet poster
Posts: 27
Vlookup and print loop
Thanks Don/Dave,
Yep that's cleared up the problem I was having - I was not not sure what the
'k' was - anyway all working fine now so thanks again!
"Dave Peterson" wrote in message
...
Don's original code looked at column K.
If you want to look at column G, just change that "k" to "g"
Sub printif()
mc = "g" '<-- changed to g
For i = 1 To Cells(rows.Count, mc).End(xlUp).Row
If Len(Application.Trim(Cells(i, mc))) 0 Then
'do your thing
End If
Next i
End Sub
If this doesn't help, I think it's time to share the code you're using.
MM User wrote:
Apologies Don,
I still cannot get this working it keeps looping but even if I have an x
or
k in the G column it skips?
I'm not sure if the it goes to the next row etc?
Regards,
"Don Guillett" wrote in message
...
If Len(Application.Trim(Cells(i, mc))) 0 Then
If Len(Application.Trim(Cells(i, mc).offset(0,5))) 0 Then
--
Don Guillett
Microsoft MVP Excel
SalesAid Software
"MM User" wrote in message
...
Don,
I understand what you are doing (I think!) and also have the code to
print,
How do I loop my range for only the certain column
ie the vlookup refers to column A in the table to but the 'x' is in
colmun G?
I can use the to input the value :
lookuptablevalue = relevant row Column A value
sheets("sheet1").Range("A14").value = lookuptablevalue
Also the print command is
ActiveWindow.Selectedsheets.PrintOut Copies:=1, Collate:=True
Is there a way batch these altogether - not a problem if it is not
possible, just if it is.
Thanks
"Don Guillett" wrote in message
...
Why not be a bit simpler. Just put an x (or even anything) in the
cell
to print
Sub printif()
mc = "k"
For i = 1 To Cells(rows.Count, mc).End(xlUp).Row
If Len(Application.Trim(Cells(i, mc))) 0 Then
'do your thing
End If
Next i
End Sub
--
Don Guillett
Microsoft MVP Excel
SalesAid Software
"MM User" wrote in message
...
Hi,
I have a sheet that uses a lookup table to fill in values the sheet
is
then printed.
I would like to loop the sheet so that I am able to print several
sheets if needed, I thought the best way to achieve this would be to
add a checkbox next to each record, where there is tick (true) that
record needs to be printed, - is this possible?
Sheet1 - page to be printed dropdown list located at cell a14 which
looks up the value on sheet2 column A
Sheet2 - contains the lookup table
A B C D E F
G
(checkbox with link to cell - true/false)
a001 something something something something
something checkbox (True/False)
a002 something something something something
something checkbox (True/False)
a003 something something something something
something checkbox (True/False)
a004 something something something something
something checkbox (True/False)
a005 something something something something
something checkbox (True/False)
etc
Thanks in advance!
--
Dave Peterson
Reply With Quote
MM User
View Public Profile
Find all posts by MM User