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.
Välilehden luonti automaattisesti
automatic
2
1005
Vastaukset
- 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
Omakotitalossa väkivaltaa ounasrinteellä
Kertoo iltalehdet Mitä lienee Tapahtui. Verinen ihminen kannettu lanssiin171667Persut jakavat tekoälyllä tehtyjä kuvia maahanmuuttajista somessa
Eivät mainitse, että ovat tekoälyllä tehtyjä. Eivät näe asiassa mitään ongelmaa. Valehtelijapuolue taas vauhdissa. Unka4411391Martinan hevoset.
Tämä todella kaunis ja ketterä harmaa hevonen jolla monet kilpailut voitetaan ei ole Martinan.Tytär ratsastaa sillä tait3081289kukaan ei pakota kasteeseen..
Kommentointi estetty, joten kommentoin tähän.Kukaan ei pakota pakkokasteesta puhuvaa kastamaan lastansa.Noloa edes ehdot400995Miesmäinen vanha nainen joka kulkee lastenvaunujen kanssa
Mikähän kaheli tämä yks kaupungilla karvahattu päässä kulukeva vanha eukko on joka työntää lastenvaunuja. Onhan sitte17936Ethän leiki kanssani J- mies
Jos oletkin joku pelimies, jolla monia vaihtoehtoja, katkon kylmästi yhteyden. En jaksa sellaisia miehiä.100933Molemmat päät
aivan tulessa😫 Miksi pitää ihmisen tällaisesta kärsiä??? Jos koko ajan pnettaa, niin miksi sitä seksiä ei voi sitten s117843Kasteen merkityksestä ihmiselle
Jeesuksen hyvä ystävä Nikodemus meni heti Jeesuksen kasteen jälkeen kysymään häneltä kasteen merkityksestä ihmiselle. J389792Liikenne onnettomuus
Luin juuri Ampparista Konneveden kauheasta onnettomuudesta jossa menehtyi 60-luvulla syntynyt mies. Onko kellään tarkemp6780Mari Rantanen eroa! Lausunnot vapun pahoinpitelystä ovat järkyttäviä!
Poliisiministerin, eli sisäministeri Mari Rantasen on syytä erota!124750