Code lijn voor het verspringen met tab

[Aljohn]

Hallo,

Ik heb een exel sjabloon(.xlt Exel 2007) waar je een projectnummer en een referentie nummer in moet vullen.
Projectnummer zit op D3
Referentienummer op H3
Als ik het projectnummer ingevuld heb dan moet ik op tab drukken om naar H3 te gaan, nadat ik het referentienummer heb ingevuld moet ik weer op tab drukken
op dit moment moet hij de save as commando doen.

Dit heb ik al:

If [D3] = Not " " Then
    If [H3] = Not " " Then

    Application.Dialogs(xlDialogSaveAs).Show [D3] & " mw " & [D4] & ".xls"

End If
End If

Maar hoe krijg ik het voormekaar dat als ik het referentienummer heb ingevoerd en dan op tab druk dat hij dan dit uitgaat voeren.

Bij voorbaat dank,
Aljohn

 

[Wigi]

Geraamte van de code:

Private Sub Worksheet_Change(ByVal Target As Range)
    
    If Target.Address = "$D$3" Then
    
        Range("H3").Select
        
    ElseIf Target.Address = "$H$3" Then
    
        Range("D3").Select
        Application.Dialogs(xlDialogSaveAs).Show [D3] & " mw " & [D4] & ".xls"
        
    End If
    
End Sub

Wigi

 

[Aljohn]

Dit werkt niet voor mij,
Ik heb even een bijlage toegevoegd, misschien dat het zo wat makkelijker uitgelegd is wat ik bedoel.
Ik moet dus eigenlijk weten hoe je in vba weergeeft dat je op tab drukt.
Ik ben trouwens wel een totale leek wat betreft vba.
bij voorbaat dank

groeten

 

[Wigi]

Waar staat mijn macro dan in het voorbeeldbestand van jou?

 

[Aljohn]

Nergens, want had al zelf weer wat zitten klooten.
Maar zet hem maar eens in dat bestand, bij mij werkte hij niet.
Dus weet niet of hij bij jouw werkt?
Want dan moet je even uitleggen wat ik verkeerd gedaan heb

groeten

 

[Wigi]

Dus weet niet of hij bij jouw werkt?

Bij mij werkt dit perfect. Je vult iets in en hoeft zelfs niet meer op Tab te drukken.

Want dan moet je even uitleggen wat ik verkeerd gedaan heb

Bij code kopiëren en plakken vanop een forum kan volgens mij niet veel misgaan.

Wigi