Selectie naar Kladblok

[TonRo]

Hallo, hoe kan ik een selectie vanuit excel naar kladblok verplaatsen en kan ik dit dan ook nog onder een bepaalde naam opslaan (bijv. de naam van het kladblok bestand wordt de inhoud van een bepaalde cel). Dit alles dient wel vanuit Excel te gebeuren.

 

[gast0225]

Ik heb het niet gesimuleerd, maar het lijkt mij dat het zou moeten lukken door de selectie in Excel op te slaan als *.txt

 

[TonRo]

Hallo Pasja,

Ik kan niet ontdekken hoe ik een selectie op kan slaan.
Bij mij wordt constant het gehele blad opgeslagen.

Dus mijn vraag is, hoe sla ik enkel een selectie op ?

 

[tsjokko]

Volgens mij is de enige manier; selectie kopieren, nieuwe map openen, en dan plakken. Opslaan als *.txt.
Voordeel is dat je origineel intact blijft.

Succes,

Ricky

 

[LucB]

Maak je selectie in het Excelblad, klik op kopieëren, open Kladblok, klik op Bewerken, kies Plakken, klik op Bestand, kies Opslaan als, voer een Naam in, klik op Opslaan.

 

[Jan van Asseldonk]

Macro om tekst naar een bestand weg te schrijven.

Sub WriteToTextFile()
' schrijft data naar een tekstbestand
' als het bestand nog niet bestaat wordt het gemaakt.
Dim iFileNumber As Integer
Dim myMsg As String
Dim strFileName As String

iFileNumber = FreeFile

'de tekst die naar het bestand geschreven moet worden,
'eventueel samenstellen vanuit inhoud van cellen
'bijv. myMsg = range("A1").value & " " & range("A2").value
myMsg = "Test data"

'het tekst bestand, eventueel met een inputbox naar naam vragen
'bijv. strFileName = inputbox("Geef pad en bestandsnaam: ")
strFileName = "C:\test.txt"

'wegschrijven van de tekst
Open strFileName For Output As #iFileNumber
Print #iFileNumber, myMsg
Close #iFileNumber
End Sub

 

[TonRo]

Hallo

Dit is precies wat ik bedoel Jan. Vanuit Excel dmv code's een gedeelte van de tekst op kunnen slaan. ook de optie van LucB was goed alleen was het de bedoeling dat het geautomatiseerd werd. Maar in elk geval dank aan allen die geantwoordt hebben, want ik heb aan alle antwoorden iets gehad.

mijn probleem is in elk geval opgelost.