Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
964to968
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
964to968
964to968
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

kleiner gleich zeichen

kleiner gleich zeichen
09.04.2008 19:04:00
Gabi
hallo leute
in meiner MsgBox soll in einem Text das "kleiner gleich" zeichen erscheinen...leider kann ich in der VBA Ebene nur das "kleiner als" zeichen und danach das "ist gleich" zeichen schreiben.
gefällt mir aber nicht wirklich...gibts auch das richtige...vielleicht über irgend einen code? soll ja bissl ordentlich aussehen!
danke Gabi

15
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: kleiner gleich zeichen
09.04.2008 19:10:48
Ramses
Hallo
Wo ist das Problem ?
Msgbox "Das ist ein kleiner Zeichen: <"
Gruss Rainer

AW: kleiner gleich zeichen
09.04.2008 19:14:00
Gabi
nein... ich brauch das "kleiner gleich" zeichen!

AW: kleiner gleich zeichen
09.04.2008 19:41:00
Ramses
Hallo
Msgbox "Das ist ein kleiner gleich Zeichen: <="
Was anderes ist nicht möglich, da die MsgBoxen die Systemschrift von Windows übernehmen und du da keinen Einfluss darauf hast. Das " ≤ " Zeichen ist nicht im ANSI Zeichensatz enthalten sondern im erweiterten Unicode-Zeichensatz. Der wird von Windows hier allerdings nicht erkannt/verwendet.
Gruss Rainer

AW: kleiner gleich zeichen
09.04.2008 19:44:06
Gabi
genau das meinte ich...also basiert das komplette VBA auf ANSI Basis?
aber erst mal vielen Dank...für deine Erklärung! Da weiß ich wenigstens das ich net weitersuchen brauch.

Anzeige
Workaround ohne API...
09.04.2008 20:13:38
Ramses
Hallo
Wäre das eine Lösung ?
dann wäre das der Code
Private Sub UserForm_Initialize()
    Dim msgFile As String
    Dim myWEb As WebBrowser
    msgFile = "c:\test.html"
    Open msgFile For Output As #1
    Print #1, "<html>"
    Print #1, "<body bgcolor=#CCCCCC>"
    Print #1, "<p>Das ist das &quot;kleiner gleich&quot;-Zeichen: <b>&le;</b> </p>"
    Print #1, "<p>Das ist ein &quot;grösser gleich&quot; Zeichen: <b>&ge;</b></p>"
    Print #1, ""
    Print #1, "Und das ist sonst noch irgendein Text"
    Print #1, "</body>"
    Print #1, "</html>"
    Close #1
    Set myWEb = Me.WebBrowser1
    With myWEb
        With .Container
            .ScrollBars = False
        End With
        .MenuBar = False
        .AddressBar = False
        .Navigate msgFile
    End With
End Sub

Gruss Rainer

Anzeige
AW: Workaround ohne API...
09.04.2008 20:52:00
Gabi
sieht net schlecht aus...aber is halt ne userform...und die MsgBoxen sind bei mir alle schon am Start...vielleicht ändere ich es aber auch noch wenn es die Zeit zulässt
Vielen Dank auf jeden Fall für deine Hilfe

AW: kleiner gleich zeichen
09.04.2008 19:29:42
Konni
≤ ≥
Gruß:
Konni

AW: kleiner gleich zeichen
09.04.2008 19:35:17
Gabi
...danke aber haste schon mal versucht das in der VBA Ebene einzugeben oder dahin zu kopieren...da erscheint leider nur ein "?"

8804
09.04.2008 19:32:02
Reinhard
Hi Gabi,
dies klappt zwar, schon bei normalem Arial:

Sub tt()
Cells(1, 1) = ChrW(8804)
End Sub


leider weigert sich die MsgBox das auch anzuzeigen, sie zeigt chr(61) = "=" bei
msgbox chrw(8804)
oder
msgbox [A1]
Alternative wäre vielleicht, anstatt der MsgBox etwas anderes anzuzeigen, eine Userform o.ä.
Da klappts in einer Textbox.
Kommst du mit einer Userform klar?
Gruß
Reinhard

Anzeige
AW: 8804
09.04.2008 19:34:16
Gabi
ja komm ich aber die ganzen Msg boxen stehn schon und das wäre ein paar Tage Arbeit da ganze zu ändern. gibt also keine richtige Chance auf ne gepflegte Anzeige dieses Zeichens in der MsgBox...Schade

MsgBox mit API
09.04.2008 20:07:47
Reinhard
Hi Gabi,
du hast ja wohl nicht in allen Msgboxen Sondererzeichen!?
Du müßtest nur
Option Explicit
'
Private Declare 

Function MessageBoxW Lib "user32.dll" _
(ByVal hWnd As Long, ByVal lpText As Long, ByVal lpCaption As Long, ByVal uType As Long) As  _
Long
Private Declare 


Function MessageBoxA Lib "user32.dll" _
(ByVal hWnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal uType As Long) _
As Long
Private Const MB_ICONINFORMATION As Long = &H40&
Private Const MB_TASKMODAL As Long = &H2000&



Sub tt()
Dim Text As String
Dim Überschrift As String
Text = "3" & ChrW(8804) & "5"
Überschrift = "Ein Beispiel"
Call MessageBoxW(0, StrPtr(Text), StrPtr(Überschrift), MB_ICONINFORMATION Or MB_TASKMODAL)
End Sub



umbasteln in





Sub MsgBox2(Text)
was easy geht, Überschrift anpassen usw.,dann halt mit suchen alle "Msgbox" in den Codes suchen, _
schauen ob Sonderzeichen drin sind, dann die Zeile umbauen von z.B
Msgbox "3http: _
//www.activevb.de/rubriken/kolumne/kol_20/unicode.html
(nicht daß noch einer denkt ich hätte das selbst gebastelt *lächel*)
Gruß
Reinhard
Anzeige
AW: MsgBox mit API
09.04.2008 20:50:00
Gabi
hui
das sieht aber erst mal aufwendig aus für so ne kleine sache denn du hast recht es besteht starker Kürzungsbedarf
und sag mal steht ChrW(8804) nicht für = ?

AW: MsgBox mit API
09.04.2008 21:33:00
Uwe
Hi Gabi,
nur ein ganz kleiner Beitrag von mir:
8804 ist schon kleiner gleich und 8805 ist größer gleich. Mir gefallen aber
8806 als kleiner gleich und 8807 als größer gleich besser, da hast Du nicht nur EINEN Strich, sonde ZWEi, also ein richtiges Gleichheitszeichen "drunter".
Gruß
Uwe
(:o)

AW: MsgBox mit API
09.04.2008 21:33:55
Uwe
Hi Gabi,
nur ein ganz kleiner Beitrag von mir:
8804 ist schon kleiner gleich und 8805 ist größer gleich. Mir gefallen aber
8806 als kleiner gleich und 8807 als größer gleich besser, da hast Du nicht nur EINEN Strich, sonde ZWEi, also ein richtiges Gleichheitszeichen "drunter".
Gruß
Uwe
(:o)

Anzeige
AW: SORRY für DOPPELT (:-( owT
09.04.2008 21:38:00
Uwe
.

58 Forumthreads zu ähnlichen Themen

Formeln miteinander vergleichen
Pfannen-Meister

Guten Abend,
ich möchte gerne zwei Excel-Formeln miteinander begreifen, habe in der Umsetzung aber ein Problem:
Formel in der Zelle A1 = D1*E1
Formel in der Zelle A2 = D1+E1
Wie schaffe ich es, die Formeln in der Zelle A1 und A2 miteinander zu vergleichen und NICHT das Ergebni...
08.09.2008 17:18:00
Thread-ID: 1008216
3 Beiträge
Anzeige
Formeln in andere Spalte an gleiche Stelle kopiere
Eva

Hallo,
ich habe eine lange Tabelle mit hinterlegten Formeln in verschiedenen Zeilen. Nun möchte ich eine weitere Spalte einfügen. In der Spalte sind Werte. Ich möchte diese Werte, wie in der ersten Spalte auch mit den Formeln addieren, multiplizieren, usw..
Damit ich aber in der neuen S...
15.12.2008 15:03:00
Thread-ID: 1033050
9 Beiträge
gleiche Zahlen nicht gleich in VBA?
Christian

Guten Tag,
ich habe hier zwei Zahlen, die meiner Meinung nach gleich sind, aber laut VBA dann doch wieder nicht.....
Ein Vergleich im Tabellenblatt mit folgender Formel zeigt mir, das die Zahlen gleich sind:
=WENN(C5'zahlen alt'!C5;"nicht gleich";"gleich")
Per Makro sind die gle...
26.01.2009 17:09:00
Thread-ID: 1043950
3 Beiträge
Anzeige
Formel Lineare Gleichung
Richy

Tut mir leid, dass ich nochmals nerven muss.......
ich habe folgende Tabelle ........https://www.herber.de/bbs/user/67325.xls und möchte die FORMEL (nicht die Formatierung) so anpassen, dass bei der ganzen Berechung für JEDE VARIABLE ein positiver Wert erscheint.
20.01.2010 15:39:50
Thread-ID: 1131390
3 Beiträge
Vergleich mit 2 Werten mit Indexformel?
Judith

Hallo und Guten Morgen,
jetzt habe ich schon wieder ein Problem mit einer Liste, die ich auswerten soll.
Es geht darum, Werte aus 2 Spalten mit einer Liste auf einem anderen Blatt mit zu einem Teil mehrfach vorkommenden Kriterien zu vergleichen und einen Wert zurückzugeben.
https:/...
28.03.2010 07:55:49
Thread-ID: 1148895
5 Beiträge
Vergleich von Zellinhalten mittels Sverweis-Formel
Zellinhalten

Hallo Excel-Liebhaber,
ich habe ein kleines Problem mit einer Excel-Datei, bestehend aus 2 Arbeitsblättern. Die betreffende Datei habe ich dem Bericht beigefügt. Beide Arbeitsblätter sind ähnlich aufgebaut. Der kleine Unterschied besteht nur im Endergebnis, dass in jedem Arbeitsblatt in der...
12.11.2010 21:45:34
Thread-ID: 1186599
5 Beiträge
Formel mit Index und Vergleich
Helmut

Hallo Excel-Freunde,
ich muss ein Kostenberechnungsblatt entwerfen. Das Rohprodukt habe ich als Anlage beigefügt. In diesem Berechnungsblatt muß für die Option Heimzulage in der Zelle C29 ein Betrag ausgegeben werden, wenn zuvor der Schalter auf ja steht, und bestimmte Werte, die in zwei an...
02.02.2011 14:20:52
Thread-ID: 1198610
2 Beiträge
Formeln sind gleich!
serge

Hallo Leute
in der folgenden Datei habe ich ein Problem mit einer Formel die nicht immer das gleiche Resultat ergibt!
Wieso? Wer kann mir auf die Sprünge helfen?
https://www.herber.de/bbs/user/73613.zip
Serge
18.02.2011 12:45:24
Thread-ID: 1201701
8 Beiträge
Anzeige

Links zu Excel-Dialogen

UserForm WebBrowser

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
2
13
8
2
1
2
4
4
1
7
4
5
8
2
2
3
4
2
2
6
8
1
2
2
5