• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

verwijzing naar ander bestand of tabblad

Status
Niet open voor verdere reacties.

ronnie123

Gebruiker
Lid geworden
21 nov 2007
Berichten
595
Hallo forum leden
is het mogelijk dat als de uitkomst in B6 0 is dat er een ander bestand of tabblad geopend wordt
en hoe pak ik dat aan
grt ronnie
 
Wil je dan een leeg tabblad openen?
 
Hallo JVeer
bedankt voor de reactie
er moet een bestaand tabblad geopend worden
 
Code:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Cells(6, 2) = "0" Then Sheets(3).Activate
End Sub

Zo ga je naar tabblad 3 als B6 0 is.
 
Laatst bewerkt:
oke bedankt voor de snelle hulp!
ik ga er mee aan de gang en is het ook mogelijk om naar een ander bestand te gaan deze zijn altijd tegelijk geopend ( dat heb ik straks ook nog nodig )
bvd ronnie
 
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
 If Range("B6") = "0" Then Workbooks.Open "c:\"......................".xlsx"
End Sub

Op de puntjes je pathname
 
JVeer heb nog een vraagje hoe zet ik het tabblad waarin B6 staat erbij nu gebeurt het in alle tabbladen
grt ronnie
 
De eerste code werkt inderdaad op alle tabbladen. De tweede code moet je in blad 1 zetten.
 
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
 If Range("B6") = "0" Then
 Sheets(3).Activate
 Workbooks("Filenaam" & ".xlsx").Activate
 End If
End Sub

Ik had even niet gezien dat je bestand altijd open is. Dan moet je deze gebruiken.
Nu wordt eerst tabblad 3 geopend en daarna je andere bestand. Je kunt zelf even kijken hoe je het precies wil.

Gr JV
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan