Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
18.04.2024 17:45:21
Shellkommando ausführen, stderr auslesen
18.04.2024 17:41:41
Summe: Bestimmter Bereich mit sverweis
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
740to744
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
740to744
740to744
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Einfügen - Symbol in VBA möglich?

Einfügen - Symbol in VBA möglich?
10.03.2006 20:41:50
Daniel
Hallo,
es gibt die Möglichkeit, Sonderzeichen und Mathematsche Symbole über den Menübefehel: EINFÜGEN-SYMBOL direkt in eine Zelle oder Textbox einzufügen, ohne dazu die Schriftart auf einen anderen Zeichensatz umzustellen (wenn der Unicode(hex) verwendet wird, dnnn sind mehr als 256 verschiedene Zeichen pro Zeichensatz möglich)
Jetzt würde ich diese Sonderzeichen gerne über ein VBA-Makro verwenden, aber der Makrorekorder zeichnet nur den normalen ASCII-Code mit 256 Zeichen auf, d.h. wenn ich beispielsweise das Summenzeichen einfüge, zeichnet der Makrorekorder das Fragezeichen auf (code = 63)
Gibt es also eine Möglichkeit, den Unicode-Zeichensatz über Makros in eine Zelle einzufügen?
Gruß, Daniel Eisert

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ja, auch wenn du die Zeichen nicht direkt...
11.03.2006 03:33:35
Luc:-?
...in den Code schreiben kannst, Daniel.
Ich verwende dafür einerseits selbstgeschriebene udFunctions (muss die Zelle aber als Unicode formatiert wdn) und andererseits eine xlMappe mit 3 Unicode-Quantitäten, die sich auf verschiedene Unicode-Schriftarten einstellen lassen. Mit verschiedenen "Lupen" können die Einzelzeichen betrachtet und aus diesen kopiert wdn. Es gibt auch eine Möglichkeit, Zeichen nebst Formatierung auf eine Zelle "fern" zu übertragen (die Zieladresse muss angegeben wdn).
War mal ein Versuch zu der Problematik und deshalb in der täglichen Praxis vielleicht etwas schwerfällig. Bei Wunsch kann ich dir das eine oder andere mal ins Forum bzw auf den Server stellen.
Gruß zum WE
Luc :-?
Anzeige
AW: Einfügen - Symbol in VBA möglich?
11.03.2006 10:04:30
Reinhard
Hi Daniel,
in xl2000 gibts wohl kein Einfügen-Symbol oder ich übersehe es.
Wie wärs damit für das Summenzeichen:

Sub ttt()
With Range("B1")
.Font.Name = "Arial Unicode MS"
.Value = ChrW(425)
End With
End Sub

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Gelöst, Vielen Dank
12.03.2006 14:00:05
Daniel
Hallo
chrw() ist also der schlüssel zum Sonderzeichen
Vielen Dank, funktioniert einwandfrei
Gruß, Daniel
AW: Einfügen - Symbol in VBA möglich?
11.03.2006 16:40:27
Thomas
Hallo Daniel,
schreib Dir einfach eine Funktion ...

Option Explicit
Public Function Unicode(code As Long) As String
    Unicode = ChrW(code)
End Function


Gruss
Thomas
Risi Thomas Softwareentwicklung
Addins - Datenbanklösungen - Komponenten - RTDServer
Anzeige

300 Forumthreads zu ähnlichen Themen

Mittels VBA Zellbereich einfärben
Fred

Hallo zusammen
Ich habe da ein Problem, und zwar stehen bei mir in der Tabelle im Bereich D2 bis AD100 unterschiedliche Datums. Wenn das Datum kleiner ist als das heutige, hätte ich gerne, das sich die entsprechende Zelle Rot färbt. Ich habe das mal mit bedingter Formatierung versucht, aber...
13.08.2008 18:52:00
Thread-ID: 1001623
13 Beiträge
Anzeige
Dynamische Wertänderung in VBA
Timo

Hallo,
ich habe ein kleines Problem und möchte vorab sagen, dass ich ein wirklicher VBA Laie bin. Ich habe folgendes Makro aufgenommen (nicht selbst geschrieben, da ich das nicht kann):
Sub updatechartloanvolumetrend()
If Range("C10") = "19981998" Then
ActiveSheet.ChartObjects("...
05.09.2008 09:38:00
Thread-ID: 1007590
3 Beiträge
Formel in Zelle per VBA einfügen
Werner

Wie kann ich Statistikformeln (Mittelwert, Maximum, Minimum, Standardabweichung) per VBA in eine Zelle einfügen?
Der zu berechnende Bereich geht von "$J$1" bis "$J$n" wobei n mit ActiveCell.Row-2 zuvor berechnet wird.
Gruß Werner.
10.09.2008 14:17:46
Thread-ID: 1008801
5 Beiträge
Anzeige
Kopieren VBA anstatt einer Formellösung
Bernhard

Hallo liebe Excel-Freunde,
wer kann mir helfen, eine Aufgabenstellung, die ich zwar mit Formeln gelöst habe mit einem VBA Makro zu lösen. Wie kopiere und paste ich Werte aus einer Tabelle1 in eine Tabelle2, abhängig davon ob ein Wert in einer bestimmten Spalte ist. Das Beispiel habe ich zum...
24.09.2008 17:28:00
Thread-ID: 1012129
9 Beiträge
Code für Groß- und Kleinschreibung VBA
Urmila

Hallo,
ich habe folgenden Code (Teil vom Code)
If Cells(iRow, 1).Value = "x" Then
Hierbei erkennt Excel nur das kleine x und nicht das große X. Wie kann man das umgehen, dass Groß- und Kleinschreibung nciht geachtet werden sollen bzw beachten werden sollen?
LG
Urmila
09.10.2008 14:16:51
Thread-ID: 1015349
3 Beiträge
Mit VBA ein anderes Makro ändern
Markus

Hallo zusammen,
besteht die Möglichkeit, dass man mittels Makros ein anderes Makro bzw. den Code für Worksheet_Activate ändern kann?
Problem 1
Sub Worksheet_Activate() 'ScrollArea = "C3: Bf32" ScrollArea = "" End Sub
Es soll danach wie folgt aussehen (Änderung in Zeile 1 und...
12.10.2008 14:24:49
Thread-ID: 1015855
7 Beiträge
zählenwenn in VBA-Array
David

Hallo zusammen.
folgendes Makro:
Sub finden() Dim P(12), C(9) P(1) = Application.WorksheetFunction.Choose(Int(Rnd() * 3) + 1, "A1", "A2", "A3") ... (das packe ich später noch in eine Schleife) P(12) = Application.WorksheetFunction.Choose(Int(Rnd() * 3) + 1, "B1", "B2", "B3") C(1) = Ap...
14.10.2008 09:14:00
Thread-ID: 1016232
8 Beiträge
VBA Zellen prüfen, txt kopieren, einfügen in txt
Stevie

Hallo Zusammen,
da ich kaum Erfahrung im Bereich VBA habe hätte ich gerne mal folgendes Problem :)
Ich habe folgenden Code der Variablen in einer Textdatei ersetzt, eine neue Datei speichert und die File anschleißend mittels Batchrutine an einen Drucker schickt.
Hier der bisherige C...
06.11.2008 09:56:19
Thread-ID: 1022167
3 Beiträge
Anzeige

Links zu Excel-Dialogen

TextBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
12
2
2
4
5
8
2
6
7
2
2
2
2
3
3
15
6
4
4
4
3
4
2
4
7