Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
16.04.2024 17:05:25
formatierten Text direkt in Zelle einfügen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
648to652
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
648to652
648to652
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Am Raster ausrichten

Am Raster ausrichten
08.08.2005 21:33:08
Matzemalzbier
Hallo lieben Leute,
Excel bietet wunderbar einfache Werkzeuge zum zeichnen.
Eines davon nennt sich "am Rater ausrichten"
Nun möchte ich beim auswählen eines Tabellenblatts diese Funktion aktivieren, da sie standardmäßig ausgeschaltet ist.
Probelm:
Ich bekomme nicht heraus wie dieses Objekt sich in VBA nennt.
Der Makrorekorder zeichnet den Befehl nicht auf.
In der Hilfe finde ich nichts:-(
In den Foren auch keine Spur.
Hat jemand eine Lösung?

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Am Raster ausrichten
08.08.2005 22:40:13
Herbert
eine Lösung ohne VBA...
beim Verschieben die "Alt-Taste" zu drücken.
gruß Herbert
AW: Am Raster ausrichten
09.08.2005 00:19:36
Matzemalzbier
Hallo Herbert,
danke für Deine Antwort.
Um Beispielsweise ein Rechteck zu zeichnen wäre...
Dein Vorschlag -Standard="Frei beweglich"- und mit der -Alt-Taste=am Raster Ausrichten-
Mein Wunsch ist -Standard=Am Raster ausrichten- und mit der -Alt-Taste=frei beweglich-
um es an den Gitternetzlinien auszurichten.
Nochmals Danke, Matzemalzbier.
AW: Am Raster ausrichten
09.08.2005 02:31:56
Herbert
wenn du Excel standardmäßig startest,
geht's auch ohne Klassenmodul:


'in "Diese Arbeitsmappe" der pers.Makroarbeitsmappe
Private Sub Workbook_Open()
Call ausrichten_am_Raster
End Sub
'In ein Standardmodul der pers.Makroarbeitsmappe
Sub ausrichten_am_Raster()
CommandBars.FindControl(ID:=549).Execute
End Sub

     gruß Herbert
Anzeige
AW: Am Raster ausrichten
09.08.2005 02:48:44
K.Rola
Hallo,
und das gilt dann auch für neue Workbooks?
Gruß K.Rola
AW: Am Raster ausrichten
09.08.2005 08:13:03
Herbert
ja,zumindest bei XP...
wenn man Excel ohne neue Mappe startet,geht's nicht...
gruß Herbert
AW: Am Raster ausrichten
09.08.2005 16:12:01
K.Rola
Hallo,
ist wohl ein kleines Missverständnis. Mit dem Klassenmodul wird während einer
Excelsitzung jede neue Mappe und jedes geöffnete Workbook "behandelt".
Gruß K.Rola
AW: Am Raster ausrichten
09.08.2005 16:19:42
Herbert
hallo K.Rola,
was verstehst du den unter "behandelt" ?
er wollte daß es standardmäßig aktiviert ist,
und bei Drücken der Alt-Taste, deaktiviert ist,
genau so ist es...oder habe ich was falsch verstanden...
gruß Herbert
Anzeige
AW: Am Raster ausrichten
10.08.2005 23:21:35
Matzemalzbier
Hallo Ihr zwei,
mit dem execute-Befehl habt ihr mir sehr geholfen.
Ich glaubte das diese Funktion eine Eigenschaft von Application oder Workbook sei.
Sie ist scheinbar nicht.
Ist auch nicht wichtig.
Wichtig ist das ich jetzt mit execute die Funktion aufrufen kann.
Hatte auch schon die ID des Buttons. Aber habe irgendwie die execute-Methode verdrängt.
Tausend Dank, Matzemalzbier.
AW: Am Raster ausrichten
08.08.2005 22:43:45
K.Rola
Hallo,
soll das in einer bestimmten Mappe so sein oder auch bei allen neuen Mappen?
Gruß K.Rola
AW: Am Raster ausrichten
09.08.2005 00:10:26
Matzemalzbier
Hallo K.Rola,
wenn Du mich so fragst, auch in allen neuen Mappen.
Es geht mir nur darum wie ich diesen Schalter auf VBA-Sprache umschalten kann.
Habe quasi den Namen der "Taste" nicht gefunden.
Möchte halt nicht die Funktion "am Raster Ausrichten" per Hand einschalten.
Ich arbeite mit einem Formular in dem eine Tabelle so eingerichtet ist wie ein Millimeterpapier um Skizzen zeichnen zu können. Schließt man Excel so ist die Funktion abgeschaltet und man muss sie per Hand wieder einschalten. Somit wäre es eine Erleichterung beim Aktivieren der Tabelle("Skizze") die Ausrichtung am Raster ein zu schalten.
Danke für Deine Mühe, Matthias.
Anzeige
AW: Am Raster ausrichten
09.08.2005 00:50:46
K.Rola
Hallo,
ins Modul "DieseArbeitsmappe" deiner PERSONL.XLS

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Call Class_terminate
End Sub



Private Sub Workbook_Open()
Call Class_init
End Sub

In ein Standardmodul:
Dim objApp As New clsApp
Sub Class_init()
If objApp.App Is Nothing Then Set objApp.App = Application
End Sub
Sub Class_terminate()
Set objApp.App = Nothing
End Sub
In ein Klassenmodul, dass clsApp heißen muss:
Public WithEvents App As Application

Private Sub App_NewWorkbook(ByVal Wb As Workbook)
On Error Resume Next
CommandBars.FindControl(ID:=549).Execute
End Sub

Gruß K.Rola
Anzeige
AW: Am Raster ausrichten
09.08.2005 00:58:04
K.Rola
Hallo,
was vergessen, das muss auch noch in das Klassenmodul:

Private Sub App_WorkbookActivate(ByVal Wb As Workbook)
On Error Resume Next
CommandBars.FindControl(ID:=549).Execute
End Sub

Gruß K.Rola

86 Forumthreads zu ähnlichen Themen

Name der Checkbox in eine Zelle
Reinhardt

Hallo,
ich habe gleich zwei Fragen:
1) Nach anklicken einer Checkbox soll diese Ihren Namen in Zelle A1 schreiben.
z.B. CheckBox12 Wie geht das?
2) Nach dem anklicken der Box hat diese ein Häckchen.
Dieser soll nach dem Anklicken gleich wieder verschwinden.
Wer kan...
06.10.2008 14:22:26
Thread-ID: 1014444
2 Beiträge
Anzeige
Checkbox in Zelle schreiben
Markus

Hallo
Wie kann ich erreichen, daß zwei Checkboxen in einer Userform in die Zellen ein (G) schreiben und wenn ich die Checkboxen das Häcken entferne auch das (G) nicht mehr drin ist.
Wäre es auch möglich, daß wenn Checkbox1 ein Häcken hat Checkbox2 keines mehr hat.
Checkbox1 in Zelle...
30.01.2009 22:42:52
Thread-ID: 1045549
4 Beiträge
Umschaltfläche in verbundener Zelle zentrieren
Michael

Hallo,
hat jemand eine Idee, wie ich eine Umschaltfläche in einer verbundenen Zelle zentrieren kann, nachdem ich Zeilen eingefügt habe und die Schaltfläche nun irgendwo im oberen Drittel der verbundenen Zelle hängt ?
11.03.2009 15:57:39
Thread-ID: 1059159
19 Beiträge
Anzeige
Formularsteuerelement Dropdown Werte in Zelle
Ingrid

Hallo,
ich habe hier eine Exceldatei welche mehrere Formularsteuerelemente-Dropdowns hat.
Der jeweilig aktuell ausgewählte Wert soll in eine Zelle geschrieben werden.
Ich habe versucht dem Dropdown ein Makro zuzuweisen das tut aber nicht.
Nehme ich statt des Formularsteuerelemen...
28.09.2010 18:43:39
Thread-ID: 1179793
3 Beiträge
Tabelle in Word einfügen
Carle

Hallo miteinander,
ich stehe vor der an und für sich einfachen Aufgabe (sollte man jedenfalls meinen) eine Tabelle in ein Word-Dokument einzubinden. Ich gehe wie folgt vor: Tabelle wird in Excel markiert und kopiert, dann wechsele ich in das Word-Dokument und gehe auf Bearbeiten/Inhalte ein...
03.01.2011 12:26:59
Thread-ID: 1193638
4 Beiträge
Checkbox - formelinhalt in zelle wiedergeben
Björn

ich brauche 2 checkboxen mit einer funktion. wenn die eine markiert ist, dann soll in der zelle b38 das ergebnis einer funktion (=verketten(bla bla)) erscheinen. wenn die 2te checkbox makiert ist soll in der selben zelle das ergebnis einer anderen formel dort erscheinen. beide checkboxen gleich...
27.01.2011 19:37:52
Thread-ID: 1197716
4 Beiträge
Checkbox in zelle fixieren
Felix

Hallo,
ich habe mir aus Archiveinträgen diesen Code zusammengeflickt und theoretisch funktioniert er auch, um eine Zeile neben der Checkbox grün einzufärben, wenn diese aktiviert wird.
Private Sub CheckBox1_Click() If CheckBox1 Then Range("A2:l2").Interior.ColorIndex = 4 Else Range("A...
06.04.2011 14:03:12
Thread-ID: 1209300
5 Beiträge
zahlen aus excel in wordtabelle farbig einfügen
preusbep

hallo ich würde gerne zahlen die ich aus excel lese in eine wordtabelle farbig einfügen. Leider werden die Zahlen nicht farbig sondern bleiben schwarz !
Danke für die Hilfe Sub farbe3() Dim Farbe(1 To 3, 1 To 1) As Single Set Word = CreateObject("word.Application") For i = 1 To 3 Farbe(i, 1...
27.09.2011 15:29:42
Thread-ID: 1231690
4 Beiträge
Anzeige

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
1
2
3
18
5
2
3
3
4
3
2
4
1
1
2
1
1
8
4
9
3
1
2
4
7