anfrage@excel-inside.de | 
0160-93 82 19 37 | Nehmen Sie Kontakt auf, um Ihre Anforderung zu besprechen. NEU: Besuchen Sie unser Diskussionsforum Office-Fragen.de
111005
Mit diesem Code kann innerhalb einer Zelle eine Laufschrift erstellt werden.
Die Buchstaben werden der Reihe nach vertauscht.
Sub Rotieren()
Dim C As Range
Dim i%
Set C = ActiveCell
For i = 1 To 2000
C = Right(C, Len(C.Value) - 1) + Left(C, 1)
Application.Wait Now + TimeSerial(0, 0, 1)
Next i
End Sub
Aktuell sind 28 Gäste und keine Mitglieder online
      |
|
|
|
 |
 |
|
| Maßgeschneiderte Individuallösungen für Ihren Erfolg |
|
Office-Fragen.de ist das Forum rund um Microsoft Office, PALO und LibreOffice.
[Excel, Word, Outlook, Access, Visio, Office365, Office mac: u.v.m.]
Wenn Sie Fragen haben, dann können Sie diese jederzeit gerne im Forum stellen. Die anwesenden Moderatoren und ggf.
auch andere Forumsteilnehmer werden Ihre Problemstellung schnellstmöglich bearbeiten.
Möchten Sie Ihr Wissen weitergeben? Dann sind Sie selbstverständlich auch jederzeit herzlich im Forum willkommen.
Jeder registrierte Benutzer erhält das kostenlose E-Book "Die 100 wichtigsten Formeln und Funktionen" für Excel.
Registrieren Sie sich noch heute und sichern Sie sich das kostenlose Willkommensgeschenk.
