X solu=välilehden nimi

1) Välilehden nimi "Tau1", kun kirjoittaa soluun C3 tekstin "Tau1", niin eikös se ole siinä?

2) Jos kirjoittaa samaan soluun =Sheet(), niin tulos on kaiketi sama?

(-;

Solu pitäisi olla määritettynä siten että kun siihen kirjottaa tekstiä ja painaa enter niin sama teksti ilmestyy kyseisen välilehden nimeksi. Eli toiminta olisi jotenkin asetettu kyseisen "solun rakenteeseen(?)".

Jos vaikka A1 soluun oisi tehty tälläinen "kikka" niin aina kun kirjottaisin A1:seen jotain ja painaisin enter, niin solun A1 sisältö muuttaisi välilehden nimen täksi samaksi. Eli A1=Sheetin nimi.

Tämä voi olla joku aivan törkeen yksinkertainen asia, mutta oon vähän huono selittämään =P

sweit kirjoitti:

Solu pitäisi olla määritettynä siten että kun siihen kirjottaa tekstiä ja painaa enter niin sama teksti ilmestyy kyseisen välilehden nimeksi. Eli toiminta olisi jotenkin asetettu kyseisen "solun rakenteeseen(?)".

Jos vaikka A1 soluun oisi tehty tälläinen "kikka" niin aina kun kirjottaisin A1:seen jotain ja painaisin enter, niin solun A1 sisältö muuttaisi välilehden nimen täksi samaksi. Eli A1=Sheetin nimi.

Tämä voi olla joku aivan törkeen yksinkertainen asia, mutta oon vähän huono selittämään =P

Lue lisää

taulukon moduuliin...
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("A1")) Is Nothing Then
ActiveSheet.Name = Range("A1")
End If
End Sub

kunde kirjoitti:

taulukon moduuliin...
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("A1")) Is Nothing Then
ActiveSheet.Name = Range("A1")
End If
End Sub

Lue lisää

Kiitos!

kunde kirjoitti:

taulukon moduuliin...
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("A1")) Is Nothing Then
ActiveSheet.Name = Range("A1")
End If
End Sub

Lue lisää

Heh heh.. Voisitkos vielä rautalangasta vääntää mihin tuo pitää laittaa. Olen koittanut tökötä tuon koodin Visual Basicin kautta joka paikkaan, mutta eihän se mistään toimi.

Nimimerkillä "ei vain osaa"

Sweit kirjoitti:

Heh heh.. Voisitkos vielä rautalangasta vääntää mihin tuo pitää laittaa. Olen koittanut tökötä tuon koodin Visual Basicin kautta joka paikkaan, mutta eihän se mistään toimi.

Nimimerkillä "ei vain osaa"

Lue lisää

W00t! Sain toimimaan, Kiitos! =)

Function TaulukonNimi()
    Application.Volatile
    TaulukonNimi = ActiveSheet.Name
End Function