http://keskustelu.suomi24.fi/show.fcgi?category=108&conference=4500000000000708&posting=22000000019318739
kaavaongelmia
Kirjoittanut: Solukko 7.9.2006 klo 14.25
Voiko laskea kaavaa samaan soluun? Eli jos on solu jossa luku 5. Siihen samaan soluun lisätään 3 niin automaattisesti se laskee yhteenlaskun 5 3 =8 kyseiseen soluun.
Tapasin tossa nimimerkin T-N täällä Thaimaassa reilu viikko sitten, joka oli vastaillut ketjuun kanssa ja juttelimme asiasta. No kerroin, että asian voi tehdä ainakin 2 eri tavalla helposti, joten kerrotaan se nyt muillekin
taulukon moduuliin... käytä vaan jompaakumpaa, mutta ei molempia yhtäaikaa
kommenttia apuna käyttäen
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Application.EnableEvents = False
LisääVanhaan Target
Application.EnableEvents = True
End Sub
tai solun ID:tä apuna käyttäen
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Application.EnableEvents = False
LisääID Target
Application.EnableEvents = True
End Sub
moduuliin... (voit laittaa molemmat)
Option Explicit
Sub LisääVanhaan(Solu As Range)
Dim edellinen As Double
Dim nykyinen As Double
On Error Resume Next
With Solu.Cells(1, 1)
edellinen = CDbl(.Comment.Text)
.Comment.Delete
If Len(.Formula) > 0 Then
nykyinen = .Value
.Formula = edellinen nykyinen
.AddComment CStr(edellinen nykyinen)
End If
On Error GoTo 0
End With
End Sub
Sub LisääID(Solu As Range)
Dim edellinen As Double
Dim nykyinen As Double
On Error Resume Next
With Solu.Cells(1, 1)
edellinen = CDbl(.ID)
.ID = ""
If Len(.Formula) > 0 Then
nykyinen = .Value
.Formula = edellinen nykyinen
.ID = CStr(edellinen nykyinen)
End If
On Error GoTo 0
End With
End Sub
Keep Excelling ;-)
Nostetaanpas vanha juttu esille
0
522
Vastaukset
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 16457
- 10412
- 16347
- 3341
Mies mä oon ihan helppo
Miehelle johon oon ihastunut. Olen harvoin ihastunut, mutta suhun olen. Ei tarvitse kuin pyytää, niin...13206- 1103
- 090
Mies olen aika erakko nykyään
Vanhentunutkin olen muutamana viime vuonna parikyt vuotta. Kun en ennenkään kelvannut, niin tuskin nytkään kelpaan. Lisä090Kuinka moni palstalaisista on näin hyvässä kondiksessa
76-vuotias rokkari Rick Springfield esittelee elämäntyyliään : https://www.youtube.com/watch?v=GbxHuNy6d68367- 161