Regel met formules bijvoegen

[wieter]

Info bijlage:
Bij selectie van lege cel in kolom A, verschijnen de ComboBoxen.
Na knop "Invoeren", worden de gegevens in de regel bijgevoegd.

Probleem:
Ik zou willen dat de formules, die in de regels staan, ook gecopieërd worden naar de nieuwe regel.
Uren lang geprobeerd om bestaande routines toe te passen.
Zonder resultaat.

Weet iemand een oplossing?

Bekijk bijlage Uform tonen bij selectionchange.xlsm

 

[HSV]

Maak er een tabel (ListObject) van, in de regels die je toevoegt met 'add' worden de formules meegenomen van de rij er boven.
Zoek eens naar 'Listobects' of regel toevoegen o.i.d.
Ik kijk morgen wel verder hoe ver je bent.

 

[Roncancio]

Je zou gebruik kunnen maken van AutoFill.
Een simpel voorbeeld:

Range("B1").AutoFill Range("B1:B3")

Stel in cel B1 staat een formule.
Met bovenstaande formule wordt de formule doorgetrokken naar het bereik tot B3.
Ik denk dat je hiermee wel verder kunt.

Met vriendelijke groet,


Roncancio

 

[VenA]

Hallo Wieter,

Lang geleden volgens mij en toch maar met macro's en formulieren aan de gang gegaan:thumb:

Kleine tip van mijn kant. Maak altijd inspringspunten zodat je weet welk stuk bij elkaar hoort.

Bv

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A2:A100")) Is Nothing Then
    If Target.Count = 1 Then
        If Target.Value = "" Then UserForm1.Show
    End If
End If
End Sub

leest een stuk makkelijker dan

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A2:A100")) Is Nothing Then
If Target.Count = 1 Then
If Target.Value = "" Then UserForm1.Show
End If
End If
End Sub

In de bijlage de door Roncancio voorgestelde methode.

 

[wieter]

KNAP! VenA.(Functie: AutoFill)

Ja het is een tijd geleden, maar ik zit alleen in de winter wat met Excel te knoeien.
Ik was aan het prutsen met "Copy" en dan met "FillDown", maar het liep telkens mis.

Mijn zeer beperkte VBA-kennis is er gekomen door de codes van de experten te analyseren.
Dus het blijft voor mij altijd maar testen en opnieuw testen.
Vandaar ook dat die insprongen niet in de code stonden, meestal doe ik dat als alles klaar is.

Bedankt VenA voor jouw expertise!!!
Bedankt Roncancio voor jouw voorzet.