Hei,
Olen tekemässä makroa, jossa makron lopuksi haluaisin tallentaa auki olevan taulukon nimellä, joka saadaan tietystä taulukon solusta.
Kuinka tämä tapahtuu?
Eli makro tekee laskutoimituksia ja muuttaa esim. solun A10 arvoa. Makron lopuksi Excel-tiedosto tulisi tallentaa tiettyyn kansioon ja tiedoston nimenä olisi solussa A10 oleva arvo (tiedoston nimi siis esim. 31535.xls)
Olen tekemässä makroa, jossa makron lopuksi haluaisin tallentaa auki olevan taulukon nimellä, joka saadaan tietystä taulukon solusta.
Kuinka tämä tapahtuu?
Eli makro tekee laskutoimituksia ja muuttaa esim. solun A10 arvoa. Makron lopuksi Excel-tiedosto tulisi tallentaa tiettyyn kansioon ja tiedoston nimenä olisi solussa A10 oleva arvo (tiedoston nimi siis esim. 31535.xls)
Vastaukset 5
Vanhimmat
Sub Tallenna_nimellä()
Sheets("taulukon nimi").Select
Dim SoluA10 As String
SoluA10 = Range("A10")
On Error GoTo Virhe
ChDir "kansiopolku" (esim C:\xxx)
ActiveWorkbook.SaveAs Filename:= _
"C:\xxx" & SoluA10".xls", FileFormat:=xlNormal
GoTo Loppu
Virhe:
MsgBox ("Tallennus ei onnistunut")
Loppu:
End Sub
Sain itse neuvot tällä palstalla tuossa ja muuttelin niitä hieman:
http://keskustelu.suomi24.fi/show.fcgi?category=108&conference=4500000000000708&posting=22000000014117755
Mitenkähän tämä tärräytettäisiin vielä pdf-tiedostoksi?
Eli minulla on roblema, jossa Excel-tiedosto pitää tallentaa nimellä joka tule solusta, ja tiedostosta pitäisi tulla pdf-muotoinen.
Apua?
Olen käyttänyt pdf-creatoria ja tulostanut makrolla tiedostoon.
Eipä nyt ole tällä koneella tuota exceliä, jota olen käyttänyt.
Kokeilin myös tätä. Hyvin toimii! Miten siihen saisi lisättyä ominaisuuden, jolla makro hakee nimen yhdistelmänä kahdesta eri solusta tyyliin?:
A1=raportti
A2=30.4.2011
http://keskustelu.suomi24.fi/node/9972084
(jakari4900 nimimerkiltä pdf-tulostusmakro) jos voisit sitä soveltaa