ich versuche mit diesem Makro:
Sub Public ()
Dim A As String
Dim B As String
A = "(ActiveSheet.Range("c5")) & " Nr: " & (ActiveSheet.Range("E5")) & Left(ActiveSheet.Range(" _
D5"), 4)"
B = "Zuständig ist.: Hr. Meier 0123-456 7890"
Range("D12") = A & Chr(10) & B
Range("d12").Characters(1, Len(A)).Font.Bold = True
Range("d12").Characters(1, Len(B)).Font.Size = 10
End Sub
folgendes zu lösen:Wert A= Hole diverse Werte und setze sie mir als Variable A
Schreibe in Zelle D12 die Variable A in Fettschrift Größe 14 (Standard der Zelle). Mache ein Alt Enter (Chr(10)). Schreibe nun Variable B in textgröße 10 und NICHT Fett.
Leider gelingt das so nicht.
Jemand einen Anstoss für mich?
Gern auch gegen Bezahlung