Excel VBA | newline toevoegen in een cel

Pagina: 1
Acties:

Vraag


Acties:
  • 0 Henk 'm!

  • Paultje3181
  • Registratie: November 2002
  • Laatst online: 21:47
Via een macro heb ik in een cel een lang stuk tekst staan. Dit is gescheiden door een ";"
Visual Basic:
1
labwaarden = labwaarden & ";" & "K: " & Trim(Mid(afhandeling, 45, 99)) & " (" & Mid(afhandeling, 35, 10) & ")"


Nu wil ik dat op de plekken van de ";" een newline gezet wordt.
Als ik in bovenstaande code het stukje & ";" & wijzig in & vbLf & werkt het, maar begint de cel met tig newlines voordat het juiste stuk er staat. En dat is ook niet heel leesbaar.

Dus hoe kan ik dit werkend krijgen in Excel 2016?

Alle reacties


  • breew
  • Registratie: April 2014
  • Laatst online: 22:51
vbCrLf , of vbNewLine (=hetzelfde) zou prima moeten werken.
vbLf werkt bij mij ook gewoon.. mogelijk is er dan bij jou iets anders aan de hand?
newline vba

Wat is de waarde van "labwaarden"? Kan het zijn dat deze vaak "leeg" is, waardoor je al die "lege" regels meepakt?

mogelijkheden : http://powerasp.net/content/new/vbscript-constants.asp

[ Voor 90% gewijzigd door breew op 23-09-2017 07:58 ]


  • Paultje3181
  • Registratie: November 2002
  • Laatst online: 21:47
Labwaarden is een string die begint met een x aantal spaties en dan ** en dan tekst.
Het gekke is dat als ik in de cel ga staan en enter geef, zonder aanpassingen, hij wel goed springt.

  • breew
  • Registratie: April 2014
  • Laatst online: 22:51
Paultje3181 schreef op zaterdag 23 september 2017 @ 08:11:
Labwaarden is een string die begint met een x aantal spaties en dan ** en dan tekst.
Het gekke is dat als ik in de cel ga staan en enter geef, zonder aanpassingen, hij wel goed springt.
wellicht helpt het om de worksheet even opnieuw te berekenen?
code:
1
2
ActiveSheet.EnableCalculation = False  
ActiveSheet.EnableCalculation = True