Miten saan kaavan maksimiarvon siirtymään toiseen soluun siten, että kaavan arvon laskiessa toiseen soluun siirretty arvo ei muutu? Jos kaavan arvo nousee muuttuu myös arvo toisessa solussa.
Maksimiarvo näkyviin
4
333
Vastaukset
taulukon moduuliin...
muuta solut sopiviksi nyt
A1=kaava
A2= solu, mihin tulos siirretään
Private Sub Worksheet_Change(ByVal Target As Range)
Static vanha
On Error Resume Next
Application.EnableEvents = False
If vanha = Empty Then
vanha = Range("A1")
End If
If Range("A1") > vanha Then
Range("A2") = Range("A1")
End If
vanha = Range("A1")
Application.EnableEvents = True
End Sub- Ei_ekspertti
Kiitos kunde vastauksesta.
Vaihdoin solut
A1 --> G2 ja A2 --> G3
sekä lisäsin ensimmäiseksi riviksi
Sub maksimi()
Kun ajaa makron tulee seuraava virheilmoitus
Compile error:
Expected End Sub
Teinköhän jotain väärin? Ei_ekspertti kirjoitti:
Kiitos kunde vastauksesta.
Vaihdoin solut
A1 --> G2 ja A2 --> G3
sekä lisäsin ensimmäiseksi riviksi
Sub maksimi()
Kun ajaa makron tulee seuraava virheilmoitus
Compile error:
Expected End Sub
Teinköhän jotain väärin?et voi nimetä taulukon tapahtumaa omaksi makroksi.
Virheilmoitus tulee siitä kun lisäsit sen rivin etkä lisännyt viimeiselle riville End Subia...
joten poista se lisäämäsi rivi ja muuta vain soluosoitteet-älä mitään muuta
ja muista
TAULUKON MODUULIIN...- Ei_ekspertti
kunde kirjoitti:
et voi nimetä taulukon tapahtumaa omaksi makroksi.
Virheilmoitus tulee siitä kun lisäsit sen rivin etkä lisännyt viimeiselle riville End Subia...
joten poista se lisäämäsi rivi ja muuta vain soluosoitteet-älä mitään muuta
ja muista
TAULUKON MODUULIIN...Kiitos kunde!
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Eutanasia - miksi eläimelle sallitaan armokuolema, mutta ihmiselle ei?
Olen pitkään ihmetellyt yhtä asiaa Suomessa. Kun koira kärsii parantumattomasta sairaudesta ja kovista kivuista, eläinlä1211296Veli Sofia teki urosmehiläisen työn
Paljastaessaan kuinka TPS:ssä ei joukkuehenki toimi sooloilijoiden vuoksi, jonka takia koko seura ei pärjää kilpailussa373823Unisex-vessat
Ahdistaa. Miksi kaikki pitää tasapäistää tasa-arvon nimissä? Tasa-arvo on sitä, että kunnioitetaan sukupuolien erilaisu1092989Sosiaalidemokratia romahtanut kautta maailman
nuoret eivät enää kannata järjetöntä aatetta, joten demarien täytyy hakea kannattajia mamuista. Ruotsin sos.demit jo kie1042331Miksi Seta ja Sofia Virta ei vaadi muslimeita kunnioittamaan priden-arvoja?
Kuten tiedetään niin islam ei hyväksy sitä mitä pride edustaa. Seta-pomo Mikkonen nosti hirveän äläkän kun yksi tepsin701986Vastuun ottaminen omasta hyvinvoinnista
Olen huomannut tuttavapiirissäni ihmisiä, joilla on mt-diagnooseja. Sen sijaan, että millekään asialle yritettäisiin teh1941731Sofia Virralle täydet 12 pistettä!
Kun ei jäänyt mukaan vähemmistöjen sortamista epäsuorasti tukevaan joukkueeseen. Urheilijoiden pitäisi olla esikuvia.298979Miksi Hotelli Kainuuta dissataan?
Ihmetyttää tämä jatkuva yhden yrityksen arvosteleminen. Ikäänkuin mikään ei olisi hyvin. Kuitenkin yritys työllistää, ta17760Toisten elämän moralisointi
Eikö kukin voisi keskittyä lähinnä omaan elämäänsä? Jos jollakulla muulla on tunteita, ajatuksia, tai tekoja oman suhte143705- 53679