Invoerbox

[Dores]

Hallo,

Als eerste weet ik niet of invoerbox de juiste naam is, maar laat ik uitleggen wat de bedoeling is en misschien is er iemand die me een beetje op weg kan helpen.

In Excel wil ik een macro plaatsen die een invoer box opent (popup) waar een factuurnummer ingevoerd moet worden. Dit factuurnummer moet dan opgeslagen worden in meerdere cellen, door middel van een autofill.

Wat betreft, de autofill daar kom ik wel uitdenk ik, maar de invoerbox heb ik wat hulp bij nodig.

Bedankt,

 

[Niels28]

zo zou het kunnen.

factuurnummer = InputBox("wat is het factuurnummer?")

Niels

 

[Dores]

Hallo Niels,

Gisteren en vandaag heel veel gezocht naar de juiste code maar kon niet vinden wat ik precies nodig had, tot nu. De volgende code werkt perfect.

Sub BT_Pen_StoreInvoiceNumber()

Numerodefactura = InputBox("Numero de factura por favor?", "Numero de factura agrupada")
Range("AS3").Value = Numerodefactura & " Número de factura agrupada"
Range("AS3").Select
Selection.AutoFill Destination:=Range("AS3:AS" & Range("E65535").End(xlUp).Row)
End Sub

Maar toch bedankt voor je reactie,

Dores