Excel 2007, bovenin rij invoegen en bepaalde cellen automatisch laten vullen

[MarcoApeldoorn]

Hoi allemaal,

Ben ik weer. haha.

In een sheet gebruik ik de gegevens in rij 3 voor verdere verwerking, rij 4 en verder is "archief".
Voor nieuwe gegevens voeg ik dus steeds een nieuwe rij in op de plek van rij 3.

Kolom A zijn volgnummer op gebouwd uit jaartal (13) en dan een volgnummer.
Kolom B is de invoer datum.

Hier zoek ik nu een automatische oplossing voor, heb zitten spelen met nummering doorvoeren, maar door het invoegen van nieuwe rijen werkte dit niet.

Is het mogelijk om dit überhaupt wel automatisch te doen.

Dus na invoegen van nieuwe rij moet:

cel A3 worden A4+1 opmaak 13.001 13.002 13.003 enz.
cel B3 de datum word opmaak 00-00-0000

Het liefste zou ik de verder cellen in rij 3 ook graag automatisch willen laten vullen op basis van een email van een webform, maar dat zal wel helemaal moeilijk worden.

Alvast bedankt.

Marco

 

[popipipo]

Bekijk dit voorbeeld eens.
Nieuwe rij invoegen (rij 3)
Cel A4 kopiëren naar cel A3

 

[MarcoApeldoorn]

Willem,

Thanks, is inderdaad een heel eind wat ik bedoel.

In principe zou het mogelijk moeten zijn om de volgende handelingen in een macro te zetten:

rij invoegen
cel A4 kopiëren naar cel A3
cel B3 vullen met de huidige datum

Daar moet ik (en natuurlijk als ze willen de lezers hier) nog ff over denken.
In ieder geval bedankt voor het meedenken.

Greetz,

Marco

 

[MarcoApeldoorn]

Willem,

Heb een macro gemaakt die nu de belangrijkste dingen doet.

HOME Eerste cel in rij selecteren
ALT+i Rij invoegen
r
(Pijl naar beneden)
CRTL+c Formule kopieren
(Pijl naar boven)
CRTL+v Formule plakken
TAB Naar volgende cel gaan
CTRL+; Invoeren huidige datum
TAB Naar volgende cel gaan

Het enige waar op gelet moet worden is dat er een cel op rij 3 staat geselecteerd voordat de macro word uitgevoerd.
Weet iemand misschien hoe je ongeacht waar je in het sheet staat je cel A3 kan selecteren?

Alvast bedankt

Greetz,

Marco

 

[MarcoApeldoorn]

Willem,

Alweer een update, mijn macro bleek niet te werken, heb hem aangepast:

Sub Rijinvoegen()
'
' Rijinvoegen Macro
' Rij invoegen Nummer toekennen Datum invoegen
'
' Sneltoets: CTRL+a
'
Application.Goto ActiveWorkbook.Sheets("DATA").Cells(3, 1)
Selection.EntireRow.Insert
ActiveCell.Offset(1, 0).Range("A1").Select
Selection.Copy
ActiveCell.Offset(-1, 0).Range("A1").Select
ActiveSheet.Paste
ActiveCell.Offset(0, 1).Range("A1").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "3/21/2013"
ActiveCell.Offset(0, 1).Range("A1").Select
End Sub

Deze werkt wel, ongeacht welk sheet ik in zit.

Samen met jouw formule kom ik nu een heel eind voor de gebruiker.

Nogmaals thanks.

Greetz,

Marco

 

[ExcelAmateur]

MarcoApeldoorn,

De helpers vinden het prettiger als je de code selecteer en dan in het menu op # klikt.
Dan komt je code netjes in een apart vak te staan.

 

[MarcoApeldoorn]

Hoi,

Zou inderdaad duidelijker zijn.
Maar misschien een domme vraag, welk menu?
Bij de invoerveld onder de berichten in dit forum zie ik geen menu staan.
Alleen opties voor opmaak, toevoegen van link, E-mail, afbeelding, video of quote.

Alvast bedankt.

 

[ExcelAmateur]

Het is geen domme vraag, ik heb het zelf ook moeten leren.
In het blad waar je een vraag of antwoord geef, staat boven in (2e menu regel) rechts in het laatste vakje staat het # teken.
Selecteer je code en klik daar dan op, nu komt de code in een apart vak te staan.

Ik hoop dat je mijn uitleg snapt.

 

[MarcoApeldoorn]

Hoi,

Ben er al achter, ik vraag/antwoord in "snel reageren", de optie die jij bedoeld staat in "+Reageer op vraag", had ik nog niet gezien, zal ik de volgende keer doen als ik code in m'n vraag/reactie verwerk.

Thanks.