Välilehden luonti automaattisesti

automatic

Moro

Onko mahdollista saada seuraava toiminto toimimaan automaattisesti:

Nappia painamalla Excel tekee uuden välilehden ja nimeää sen taul1 A2 solussa kirjoitetun tekstin mukaan. Lisäksi kopioi kaikki tiedot mitä taul1 on ja siirtää ne luotuun taulukkoon.

2

959

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • koodinpurkaja

      Makrot eivät ole minun vahvuuhteni. Tuonmoisen makron löysin netistä ja minulla se ainakin pelasi. Modifioin sitä tarpeitasi varten. En osaa tehdä siihen sitä ettei kopioisi sitä "painonappia" uuteen taulukkoon (ei kaiketi ole tarkoitus). Eli tässä:

      Sub kopioivälilehti()

      Dim newshtname

      'varoitus jos solu A2 on tyhjä
      If IsEmpty(Range("A2").Value) Then
      MsgBox "Anna nimi!", vbCritical
      Exit Sub
      End If

      'uuden nimen sijaintisolu
      newshtname = Range("A2").Value

      'varoitus samannimisestä välilehdestä
      For Each Sheet In ActiveWorkbook.Sheets
      If UCase(Sheet.Name) = UCase(newshtname) Then
      MsgBox "Antamasi nimi on jo olemassa. Anna uusi.", vbCritical
      Exit Sub
      End If
      Next Sheet

      'allaoleva kopioi välilehden, sijoittaa sen Taul1 jälkeen ja nimeää sen solun a2 mukaan
      ActiveSheet.Copy after:=Sheets(1)
      ActiveSheet.Name = newshtname
      End Sub

      Koodi löytyi tuolta:
      http://www.ozgrid.com/forum/showthread.php?t=17844

    • Tarkoitatko, että on liian monimutkaista pistää hiiren osoitin välilehti 1:n päälle, painaa ctrl alas ja vetää hiirellä tuuman verran oikealle seuraavaan välilehteen, ja sen jälkeen tuplaklikata välilehti 2 ja kirjoittaa siihen haluamansa nimi.
      Kaikki tiedot kaavoineen ovat kopioituneet uuteen välilehteen, eikä siinä nyt niin montaa napinpainallusta kulunut.

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Arman Alizadin viesti puna-aktivisteille: "Pitäkää lärvinne nytkin kiinni"

      Arman Alizad kritisoi vasemmiston kaksinaismoralismia. Iranissa syntynyt suosikkijuontaja Arman Alizad pakeni perheensä
      Maailman menoa
      355
      4531
    2. Minja Koskela nostanut vasemmistoliiton kannatuksen ennätykseen

      Koskela valittiin puolueen johtoon lokakuussa 2024, ja silloin Ylen kysely antoi puolueelle 9,3 prosentin kannatuksen.
      Maailman menoa
      148
      2558
    3. Antti johtaa Petteriä jo 7,1 prosenttiyksiköllä

      Tällä menolla sdp menee kokoomuksesta kierroksella ohi jo tällä vaalikaudella. https://yle.fi/a/74-20213575
      Maailman menoa
      82
      2166
    4. Harmi nainen kun

      olet niin elähtäneen näköinen. Miestä et koskaan löydä itelles. j
      Ikävä
      145
      1710
    5. Eikö me voitais

      Vaan harrastaa seksiä kun muusta ei tule mitään
      Ikävä
      26
      1247
    6. Hotelli kainuu

      Mietityttää, hotelli Kainuussa, se, että asiakkaat voivat valita ketä saa olla ja ketä ei, Illan aikana asiakkaina!
      Kuhmo
      44
      1242
    7. Kuinka pitkä välimatka

      on teidän kotien välillä?
      Ikävä
      36
      1205
    8. Mistä kehon osasta

      Pidät minussa eniten?
      Ikävä
      79
      1121
    9. Ovatko vastasyntyneet vauvat syntisiä?

      Se ihmisten keksimä järjetön perisynti, jos ovat!
      Luterilaisuus
      356
      1116
    10. Seuraavakin hallitus joutuu leikkaamaan

      Sitähän tämä hallitus nyt höpöttää, kun itse on ajanut tilanteen katastrofaaliseksi. Orpon hallitus lähti suurin puhein
      Maailman menoa
      143
      1029
    Aihe