Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  Excel
  Makro für grichische Buchstaben

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:   Makro für grichische Buchstaben (821 mal gelesen)
piston
Mitglied
Konstrukteur


Sehen Sie sich das Profil von piston an!   Senden Sie eine Private Message an piston  Schreiben Sie einen Gästebucheintrag für piston

Beiträge: 140
Registriert: 18.05.2004

Pro/E WF4<P>Windows XP 64bit

erstellt am: 07. Feb. 2013 12:24    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo!


Ich bräuchte ein Makro, mit dem ich aus einem Zelltext "an" ein "αn" machen kann, bzw. das mit eventuell auch nur "αn" in eine Zelle schreibt. Kennt jemand eine Lösung?

Danke!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

carsten-3m
Mitglied
Dipl.-Ing. Mbau (Produktmanagement, Patent- und Normwesen)


Sehen Sie sich das Profil von carsten-3m an!   Senden Sie eine Private Message an carsten-3m  Schreiben Sie einen Gästebucheintrag für carsten-3m

Beiträge: 950
Registriert: 08.05.2007

Excel 2010

erstellt am: 07. Feb. 2013 13:07    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für piston 10 Unities + Antwort hilfreich

Starte den Makrorekorder und zeichne Deine manuelle Vorgehensweise auf. Fertig.

------------------
Gruß, Carsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

StefanBerlitz
Ehrenmitglied V.I.P. h.c.
IT Admin (CAx)



Sehen Sie sich das Profil von StefanBerlitz an!   Senden Sie eine Private Message an StefanBerlitz  Schreiben Sie einen Gästebucheintrag für StefanBerlitz

Beiträge: 8756
Registriert: 02.03.2000

SunZu sagt:
Analysiere die Vorteile, die
du aus meinem Ratschlag ziehst.
Dann gliedere deine Kräfte
entsprechend und mache dir
außergewöhnliche Taktiken zunutze.

erstellt am: 07. Feb. 2013 14:16    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für piston 10 Unities + Antwort hilfreich


226_1751_autokorrektur-benutzen_edit.zip

 
Hallo zusammen,

mit dem Makrorekorder ist tatsächlich nicht so einfach, weil der aus dem Alphazeichen ein einfaches "a" macht. Aber mit einem kleinen Trick geht es dann so:

Code:
ActiveCell.FormulaR1C1 = ChrW(945) & "n"

Durch die ChrW Funktion kannst du den Code für das Alpha unter Windows eingeben, den Code bekommst du über die Zeichentabelle. Von da kann man natürlich auch einfach das Alpha rauskopieren.

Wenn du das einfach nur als Eingabehilfe brauchst, um eben nicht über die Zeichentabelle das jedesmal zu suchen kannst du dir dafür auch über die Autokorrekturfunktion von Excel was machen. Ich hab dir als Beispiel ein kleines Video dazu in Excel 2010 angehangen.

Ciao,
Stefan

------------------
Inoffizielle deutsche SolidWorks Hilfeseite    http://solidworks.cad.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

carsten-3m
Mitglied
Dipl.-Ing. Mbau (Produktmanagement, Patent- und Normwesen)


Sehen Sie sich das Profil von carsten-3m an!   Senden Sie eine Private Message an carsten-3m  Schreiben Sie einen Gästebucheintrag für carsten-3m

Beiträge: 950
Registriert: 08.05.2007

Excel 2010

erstellt am: 07. Feb. 2013 17:05    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für piston 10 Unities + Antwort hilfreich

Merkwürdig. Ich hatte es vor meiner Antwort natürlich selbst ausprobiert. Das aufgezeichnete Makro klappt einwandfrei.

------------------
Gruß, Carsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

piston
Mitglied
Konstrukteur


Sehen Sie sich das Profil von piston an!   Senden Sie eine Private Message an piston  Schreiben Sie einen Gästebucheintrag für piston

Beiträge: 140
Registriert: 18.05.2004

Pro/E WF4<P>Windows XP 64bit

erstellt am: 07. Feb. 2013 17:09    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Danke!

Ich habe es mit Hilfe des Makrorecorders so gelöst:

    Range("C8").Select
    Range("C8") = "an"
    With ActiveCell.Characters(Start:=1, Length:=1).Font
        .Name = "Symbol"
        .FontStyle = "Standard"
    End With
    With ActiveCell.Characters(Start:=2, Length:=1).Font
        .Name = "Arial"
        .FontStyle = "Standard"
    End With

Grüße!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2020 CAD.de | Impressum | Datenschutz