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

987

    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. Riikka Purra leikkasi alimmalta tulodesiililtä 15 %

      Muistaako kukaan Riikka Purran kovaäänisen vaalilupauksen ennen eduskuntavaaleja? https://yle.fi/a/74-20221152 "THL o
      Maailman menoa
      399
      6894
    2. Muistele nainen niitä meidän yhteisiä hetkiä

      Miltä ne tuntui? Enkö aina huokunut välittämistä, kiintymystä. Eikö sinulla aina ollut hyvä olo kanssani? Minulla ainaki
      Ikävä
      49
      3994
    3. Eroa Orpo! Orpo eroa!

      Suomen kansa vaatii viimein ottamaan meidät huomioon, eikä vain ulkomaalaisia pääomasijoittajia. Koska täällä Suomessa
      Maailman menoa
      0
      1620
    4. Odottavan aika on pitkä, Lindtmanin hallitusta tule jo!

      Eilisen perusteella nykyinen hallitus epäonnistui kaikissa vaalilupauksissaan, joten olemme ansainneet uudet eduskuntava
      Maailman menoa
      43
      1558
    5. Sillan liikuntasauma haittaa pyöräilijöitä

      Voi, voi! Sillan liikuntasauma haittaa pyöräilijöitä! https://yle.fi/a/74-20221468 Aina voi etsiä toisen reitin, jos t
      Kevytliikenne
      94
      1413
    6. Naiset ei halua kilttejä miehiä

      Näin se vaan on..jos olet ilman tatskoja, et rähjää, sinulla ei ole rikosrekisteriä, olet liian kiltti, et sano pahasti,
      Ikävä
      258
      1350
    7. Riikan vappumiljardin maksavat sairaat, vanhukset ja kuolleiden omaiset

      Vappumiljardi, eli Riikan päätös laskea yhteisöveroa kaksi prosenttiyksikköä 18 prosenttiin, vie verotuloja noin miljard
      Maailman menoa
      64
      1346
    8. Olisitko tältä

      seisomalta valmis seksuaaliseen kanssakäymiseen hänen kanssaan?
      Ikävä
      99
      1138
    9. Seiska: Helmi Loukasmäki paljastaa - Näin Danny ja Helmi tapasivat

      Helmi Loukasmäki, 25, ja Ilkka Danny Lipsanen, 83, ovat seurattuja julkkiksia. Mutta tiesitkö, miten he tapasivat? Lue
      Viihde ja kulttuuri
      22
      1076
    10. Yllätä mut ja laita viestiä

      Whatsapissa. Uskallatko vielä?
      Ikävä
      63
      1062
    Aihe