Discussion:
werkblad op sticker printen
(te oud om op te antwoorden)
Jan
2003-07-16 10:50:39 UTC
Permalink
Hallo allemaal,

Ik wil graag via excel een aantal berekeningen uitvoeren, en de uitkomsten
op een ander blad in de werkmap laten uitkomen in een aantal cellen.
Dat is allemaal geen probleem.
Nu wil ik echter het blad waar die gegevens staan uitprinten op een speciaal
stickerformaat.
In het lijstje met beschikbare formaten voor de printer staat die maat er
niet bij natuurlijk :-)
In Word kan je dan zelf een aangepast formaat opgeven, in Excel zit die
mogelijkheid niet.
Is er een mogelijkheid om toch op dat stickerformaat te printen?, en dan wel
zo natuurlijk dat de printer gewoon stopt bij de volgende sticker, en er
niet een aantal leeg laat doordraaien.
Is dat misschien mogelijk met het instellen van pagina einde o.i.d?
Ik zou dat zelf natuurlijk wel willen uitproberen, maar de printer heb ik
hier niet,(wel de driver voor die printer) en is pas na mijn vakantie weer
beschikbaar op de zaak.
In mijn vakantie zou ik echter graag wat werkbladen maken om het leven na de
vakantie wat makkelijker te maken :-)

Natuurlijk kan ik het werkblad ook in een word document laten opnemen, maar
dat is eigenlijk niet de bedoeling, omat er veel sticker snel achter elkaar
geprint moeten worden, met wel allemaal andere gegevens

Eventuele tips zie ik graag tegemoet.

B.v.b dank

Jan
S for Software
2003-07-16 12:00:42 UTC
Permalink
Jan,

Je kunt denk ik toch het beste Word gebruiken en dan gebruik maken van de
mogelijkheid "Afdruk samenvoegen" maak van het hoofddocument een sticker en
je kunt vervolgens al je (geordende) gegevens uit excel netjes samenvoegen.

succes,
Bert
Post by Jan
Hallo allemaal,
Ik wil graag via excel een aantal berekeningen uitvoeren, en de uitkomsten
op een ander blad in de werkmap laten uitkomen in een aantal cellen.
Dat is allemaal geen probleem.
Nu wil ik echter het blad waar die gegevens staan uitprinten op een speciaal
stickerformaat.
In het lijstje met beschikbare formaten voor de printer staat die maat er
niet bij natuurlijk :-)
In Word kan je dan zelf een aangepast formaat opgeven, in Excel zit die
mogelijkheid niet.
Is er een mogelijkheid om toch op dat stickerformaat te printen?, en dan wel
zo natuurlijk dat de printer gewoon stopt bij de volgende sticker, en er
niet een aantal leeg laat doordraaien.
Is dat misschien mogelijk met het instellen van pagina einde o.i.d?
Ik zou dat zelf natuurlijk wel willen uitproberen, maar de printer heb ik
hier niet,(wel de driver voor die printer) en is pas na mijn vakantie weer
beschikbaar op de zaak.
In mijn vakantie zou ik echter graag wat werkbladen maken om het leven na de
vakantie wat makkelijker te maken :-)
Natuurlijk kan ik het werkblad ook in een word document laten opnemen, maar
dat is eigenlijk niet de bedoeling, omat er veel sticker snel achter elkaar
geprint moeten worden, met wel allemaal andere gegevens
Eventuele tips zie ik graag tegemoet.
B.v.b dank
Jan
Jan
2003-07-16 13:12:36 UTC
Permalink
Post by S for Software
Jan,
Je kunt denk ik toch het beste Word gebruiken en dan gebruik maken van de
mogelijkheid "Afdruk samenvoegen" maak van het hoofddocument een sticker en
je kunt vervolgens al je (geordende) gegevens uit excel netjes
samenvoegen.
Post by S for Software
succes,
Bert
Bedankt voor je reactie Bert, maar dat is nu juist niet de bedoeling.
Veel te omslachtig om snel te kunnen werken door mensen die er niet al te
veel verstand van hebben.
In excel heb ik gewoon een werkblad, met daarop een printknop, en daarmee
moet het dan gebeuren.
Ik hebhet nu in Word via een userform, en dat werkt op zich wel aardig, maar
met excel heb je natuurlijk nmeer mogelijkheden m.b.t verwerking van
gegevens.
Alleen dat afdrukken blijft een probleem waar ik even geen oplossing voor
kan vinden.

Jan
Ber Visser
2003-07-16 14:41:53 UTC
Permalink
Ik zou met een Excel UserForm werkendie precies het formaat heeft van een
sticker, gegevens van Excel inladen en UserForm afdrukken.
--
Ber Visser
-
Post by S for Software
Post by S for Software
Jan,
Je kunt denk ik toch het beste Word gebruiken en dan gebruik maken van de
mogelijkheid "Afdruk samenvoegen" maak van het hoofddocument een sticker
en
Post by S for Software
je kunt vervolgens al je (geordende) gegevens uit excel netjes
samenvoegen.
Post by S for Software
succes,
Bert
Bedankt voor je reactie Bert, maar dat is nu juist niet de bedoeling.
Veel te omslachtig om snel te kunnen werken door mensen die er niet al te
veel verstand van hebben.
In excel heb ik gewoon een werkblad, met daarop een printknop, en daarmee
moet het dan gebeuren.
Ik hebhet nu in Word via een userform, en dat werkt op zich wel aardig, maar
met excel heb je natuurlijk nmeer mogelijkheden m.b.t verwerking van
gegevens.
Alleen dat afdrukken blijft een probleem waar ik even geen oplossing voor
kan vinden.
Jan
Pieter Kuyck
2003-07-16 15:58:49 UTC
Permalink
Jan,

Andere mogelijkheid is het toch via Word te laten afdrukken alleen dit vanuit Excel VBA afhandelen.

Zoiets kan het zijn op basis van een template waarin de samenvoegcodes staan
(code is onvolledig, dit zal nog aangevuld moeten worden - gekopieerd uit iets wat ik eens gemaakt heb)

Dim wdWordApp As Word.Application
Dim wdDoc As Word.Document
On Error Resume Next
Set wdWordApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
If Err.Number = 429 Then
Err.Clear
Set wdWordApp = CreateObject("Word.Application")
If Err <> 0 Then
MsgBox "Fout:" & vbCrLf & Err.Number & vbCrLf & Err.Description
Err.Clear
Set wdWordApp = Nothing
End If
Else
MsgBox "Fout:" & vbCrLf & Err.Number & vbCrLf & Err.Description
Err.Clear
Set wdWordApp = Nothing
End If
End If
On Error GoTo 0

Set wdDoc = wdWordApp.Documents.Open(sRapportTemplate, , , , , , True)
Call wdDoc.MailMerge.OpenDataSource(sExcelBestandMetData)
Call wdDoc.Save
With wdDoc.MailMerge.DataSource
.FirstRecord = 1
.LastRecord = lAantalRegelsUitExcelBestand
End With
wdDoc.MailMerge.Destination = wdSendToPrinter
wdDoc.MailMerge.Execute

Pieter



"Jan" <***@hotmail.com> wrote in message news:3f1572c0$0$147$***@dreader7.news.xs4all.nl...
|
| "Ber Visser" <***@pandora.be> schreef in bericht
| news:e2I%***@TK2MSFTNGP10.phx.gbl...
| > Ik zou met een Excel UserForm werkendie precies het formaat heeft van een
| > sticker, gegevens van Excel inladen en UserForm afdrukken.
| >
| > --
| > Ber Visser
| > -
| dat is natuurlijk ook een idee, maar gaat dat werken als het papierformaat
| wat ik nodig heb bij de pagina instellingen niet aanwezig is?
| Ik kan dan wel dat userform afdrukken, maar ik ben bang dat de printer denkt
| dat er A4 kettingformulier inzit, en na het afdrukken dus er een a4rtje uit
| gaat draaien, oftewel een aantal lege stickers, want die zijn maar 8 cm
| hoog.
| Het is natuurlijk lastig, want ik kan het op dit moment niet uitproberen
| omdat de printer op het werk staat.
|
|
Jan
2003-07-16 17:38:19 UTC
Permalink
Post by Pieter Kuyck
Jan,
Andere mogelijkheid is het toch via Word te laten afdrukken alleen dit
vanuit Excel VBA afhandelen.
Post by Pieter Kuyck
Zoiets kan het zijn op basis van een template waarin de samenvoegcodes staan
(code is onvolledig, dit zal nog aangevuld moeten worden - gekopieerd uit
iets wat ik eens gemaakt heb)
bedankt voor de uitleg, ga ik van de week eens uitproberen


Jan

Loading...