Kuinka saisin excelin tekemään tiettyyn kansioon, esimerkiksi c:\hep kansioon hep.txt tiedoston tietyn sarakkeen tekstistä, tai tietystä alueesta esim A1:A30?
Mikäli tuollaisen tiedoston saa tehtyä, voiko sille antaa nimen tietyn solussa olevan tekstin mukaan? Eli se ottaisi tiedostonnimeksi tekstin solusta B1?
Excelin sarakkeesta ASCII tiedosto pihalle
Gibu
4
466
Vastaukset
helpointa lienee kopioida alue uuteen työkirjaan ja tallentaa se elikä allaoleva kysyy aluetta ja kirjoittaa solun B1 tekstin mukaan tiedoston esim. c:\hep\hep.txt
Sub Tallenna()
Dim Alue As Range
Dim Polku As String
On Error Resume Next
Application.DisplayAlerts = False
Polku = Range("B1")
Set Alue = Application.InputBox(prompt:="Valitse sarakealue", Type:=8)
Application.ScreenUpdating = False
Alue.Copy
Workbooks.Add
ActiveSheet.Paste
ActiveWorkbook.SaveAs Filename:=Polku, FileFormat:=xlTextMSDOS
ActiveWorkbook.Close
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub- Gibu
Kiitoksia paljon! Johan helpotti :)
- Gibu
Tein edellisen makron pohjalta tällaisen yksinkertaisen pätkän:
Tiedostonimi = Range("Etusivu!D8")
Tiedostonimi2 = Range("Etusivu!D2")
ActiveWorkbook.SaveAs Filename:=Tiedostonimi
Tämä tallentaa taulukossa D8 olevassa solussa olevan tekstin tiedostonimeksi. Saanko jotenkin tehtyä nimeäsisen siten että se ottaisi mukaan myöskin tuon D2 kentässä olevan tekstin tyyliin D8D2.xls? Ja voinko määrittää tallennuspolkua erikseen? - ...
Gibu kirjoitti:
Tein edellisen makron pohjalta tällaisen yksinkertaisen pätkän:
Tiedostonimi = Range("Etusivu!D8")
Tiedostonimi2 = Range("Etusivu!D2")
ActiveWorkbook.SaveAs Filename:=Tiedostonimi
Tämä tallentaa taulukossa D8 olevassa solussa olevan tekstin tiedostonimeksi. Saanko jotenkin tehtyä nimeäsisen siten että se ottaisi mukaan myöskin tuon D2 kentässä olevan tekstin tyyliin D8D2.xls? Ja voinko määrittää tallennuspolkua erikseen?Menisikö näin
Polku="C:\hep\"
Tiedostonimi = Polku & Range("Etusivu!D8")&Range("Etusivu!D2")
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Kuvat! Dannyyn liitetty Helmi Loukasmäki, 22, on puhjennut naisena kukkaan - Some sekoaa: "Sä..."
Ooo, kaunis aikuinen nainen Helmistä on kasvanut siinä yli 80-vuotiaan Dannyn rinnalla! Katso uudet kuvat: https://ww675331- 573565
Suodatinpussin kastelemalla saa parempaa kahvia
Kokeilin niksiä ja kyllä tämä kahvi on parempaa nyt. Ei lainkaan maistu paperiselta. Huljuttelee hanan alla suppiloa pap1502651Tidätkö nainen
että suoraan sanottuna v.tut.aa että pääsit näin lähelle minua. Ei olisi oikeasti aikaa tähän mutta silti aina välillä o1052136Mikä on kaivattusi etunimi?
Otsikossa siis on kysymys eriteltynä. Vain oikeat vastaukset hyväksytään.891822Onkohan sinulla kaikki hyvin?
Nyt vähän sellainen outo tunne tuli. Sinun asiasi niin ei minulle toki tarvitse kertoa. Kunhan mietin...381277Oho! Arja Koriseva paljastaa TTK:n ekasta suorasta lähetyksestä: "On vähän ärsyttävä yhtälö!"
Upea Arja Koriseva! Tsemppiä haasteelliseen tilanteeseen! Lue lisää: https://www.suomi24.fi/viihde/oho-arja-koriseva-211269En kestä katsoa
Sitä miten sinusta on muut kiinnostuneita. Olen kateellinen. Siksi pitäisi lähteä pois961228Huikeeta, mahtavaa, ihan mielettömän upeeta
Me ostettiin talo Espanjasta. Tosin saadaan käyttää sitä vain muutama viikko vuodessa kun on monta muutakin ostajaa! M1951202- 1731136