Taulukossani on A-sarakkeessa tuotteiden nimiä satoja rivejä. Joudun poistamaan niitä useilta kymmeniltä riveiltä kerrallaan. Kysymykseni kuuluu, miten voisin jotain VB makronappia painamalla yliviivata yhdelläkertaa valitsemani tuotteiden nimet, jotka jäisivät vain odottamaan käsittelyä paremmalla ajalla.
Eli ensin merkkaisin Ctrl:lla hiirellä halutut solut ja napilla saisin ne yliviivatuiksi.
Osaan hieman VB-juttuja, kunhan saisi koodit millä onnistuu.
Kiitti kovasti jos joku jeesis tässä.
Tuotteiden yliviivaus
5
1685
Vastaukset
- CTRLjne
Pois ne valitut rivit saa painamalla yhtäaikaa CTRL ja miinus (-) ja valittujen solujen fonttiin efektiksi yliviivauksen painamalla CTRL ja 5.
- Tämmöinen
Sub Button1_Click()
Selection.Font.Strikethrough = Not Selection.Font.Strikethrough
End Sub - Yliviivaaja
Excel 2010 löytyy suora "Yliviivaus"-nappi.
Ylin rivi, oikea reuna löytyy "Mukauta pikatyökaluriviä"-painike. Avautuvasta valikosta valitse "Lisää komentoja". Vaihda "Suositut komennot" kohtaan "Kaikki komennot". Sieltä pitkästä listasta löytyy "Yliviivaus". Klikkaa sitä ja sitten siitä keskeltä "Lisää". Yliviivaus siirtyy oikeanpuoleiseen laatikkoon > OK. Nyt yläriviltä löytyy painike yliviivaukseen ja samasta myös sen poistoon valituista soluista. - Yliviivattuja
Tänx molemmille. Nuo olikin helppo ottaa molemmat käyttöön. :)
- Yliviivattuja
Tänx myös Yliviivaajalle vinkistä. Uskoisin, että tuo Ctrl 5 komento tulee olemaan se eniten käytetty mulla. Painonapit tein myös laiskuuden yllättäessä. :))
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Kumpi vetoaa enemmän sinuun
Kaivatun ulkonäkö vai persoonallisuus? Ulkonäössä kasvot vai vartalo? Mikä luonteessa viehättää eniten? Mikä ulkonäössä?971998- 931440
- 1121177
- 761057
- 1211052
Okei nyt mä ymmärrän
Olet siis noin rakastunut, se selittää. Onneksesi tunne on molemminpuolinen 😘57903- 49849
Olen huolissani
Että joku päivä ihastut/rakastut siskooni. Ja itseasiassa haluaisin, ettei hän olisi mitenkään sinun tyyppiäsi ja pitäis58819- 36812
- 33723