Auftragsprogrammierung

Projektanfrage über Web Formular   per Online-Formular 
Projektanfrage über E-Mail  Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein!
Projektanfrage per Telefon  +49 (0)151 / 164 55 914
Projektanfrage weitere Informationen  weitere Informationen 

Sie benötigen Hilfe oder Unterstützung? Nutzen Sie für Ihre Anfrage unser Online-Formular, senden Sie uns eine Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein!  oder rufen Sie uns einfach an.

Referenzen

 Bosch 
  T-Systems
  Hagebau
  Siemens
 Areva  VW
 Haufe-Lexware  British American Tobacco
  nagel group farbe

Laufschrift innerhalb einer Zelle

Mit diesem Code kann innerhalb einer Zelle eine Laufschrift erstellt werden.

Die Buchstaben werden der Reihe nach vertauscht, so dass der Effekt einer Laufschrift erzielt wird.


Sub Rotieren()
Dim C As Range
Dim i%
Set C = ActiveCell
For i = 1 To 25000
C = Right(C, Len(C.Value) - 1) + Left(C, 1)
Application.Wait Now + TimeSerial(0, 0, 0.5)
Next i
End Sub

Tragen Sie dazu in eine Excel-Zelle einen beliebigen Text ein, setzten Sie den Zellzeiger auf die Zelle mit dem Text und starten Sie das Makro z. B. mit der Funktionstaste [F5] im VBA-Editor.

Die For-Next-Schleift sorgt dafür, dass die Laufschrift eine beliebig Lange Zeit läuft. Sie können also die Länge der Laufschrift über die Größe der Schleife einstellen.

Das Ergebnis sehen ist in folgendem Screenshot.


Über den Befehl Application.Wait Now + TimeSerial(0, 0, 0.5) kann die Geschwindigkeit verändert werden. Der Wert 0, 0, 0.5 sorgt dafür, dass zwischen jedem Verschieben der Zeichen 0,5 Sekunden gewartet wird. 


 

Drucken E-Mail

Relevante Artikel

  • Alle Wörter mit einem Großbuchstaben beginnen lassen

    Mit diesem Makro wird der erste Buchstabe in einer Zelle bereits bei der Eingabe in einen Großbuchstaben umgewandelt.   Damit dieses Makro...

  • Umwandeln von Umlauten

    Das folgende Makro wandelt Umlaute wie z. B. ä in ae um. Fügen Sie dieses Makro einfach in ein Modulblatt ein. Umgewandelt werden alle Zellen mit...

  • Text und Werte in Spalten aufteilen

    Dieses Makro verteilt alle in Spalte A, beginnend ab Zelle A1, eingegebenen Werte (Texte, Zahlen etc.) in einzelne Zellen. So haben Sie Zugriff auf...

  • Laufschrift innerhalb einer Zelle

    Mit diesem Code kann innerhalb einer Zelle eine Laufschrift erstellt werden. Die Buchstaben werden der Reihe nach vertauscht, so dass der Effekt...

  • Zeichen in String zählen

    Dieser Beitrag zeigt verschiedene Möglichkeiten, um bestimmte Zeichen in einem String zu zählen. So soll beispielsweise im Zelleintrag "Wo steht das...

Projektanfrage

 Sie benötigen eine Auftragsprogrammierung?
 Oder suchen Unterstützung bei der 
 Lösungsfindung?

  Nutzen Sie unser Anfrageformular

  Jetzt anrufen unter 0151 / 164 55 914

 Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! Projektanfrage per Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! senden

  Weitere Informationen

sitepanel question2

P
R
O
J
E
K
T
A
N
F
R
A
G
E
Cookies erleichtern die Bereitstellung unserer Dienste. Mit der Bestätigung erklären Sie sich mit der Verwendung von Cookies auf Excel-Inside Solutions einverstanden.
Weitere Informationen Ok