Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Die Suche hat 11580 Ergebnisse ergeben.
Seite 533 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 530, 531, 532, 533, 534, 535, 536 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Index
Autor Nachricht
  Thema: Code läuft langsam 
Phelan XLPH

Antworten: 2
Aufrufe: 244

BeitragForum: Excel VBA (Makros)   Verfasst am: 04. Okt 2009, 07:47   Titel: AW: Code läuft langsam Version: Office 2003
Vielleicht so schneller?

Public Sub Zeilen_faerben()

Dim lZeile As Long
Dim iSpalte As Integer
Dim lLetzteZeile As Long

Application.ScreenUpdating = False

With Worksheets("Tabelle3")
.Unprotect Password:="ps"
lLetzteZeile = .Cells(Rows.Count, 1).End(xlUp).Row

For lZeile = 2 To lLetzteZeile
.Range("A" & lZeile & ":N" & lZeile).Interior.ColorIndex = _
IIf(lZeile Mod 2 = 0, 36, 35)
Next lZeile

.Rows("3:" & lLetzteZeile).RowHeight = 15

With .Range("A2:N" & lLetzteZeile).Borders
.LineStyle = xlContinuous ' mit einer durchgezogenen Linie abschließen
.Weight = xlHairline
End With
With .Range("A2:N" & lLetzteZeile).Borders(xlInsideHori ...
  Thema: Wenn wert groesser 0 dann zeile kopieren in neue Tabelle 
Phelan XLPH

Antworten: 10
Aufrufe: 5833

BeitragForum: Excel VBA (Makros)   Verfasst am: 04. Okt 2009, 07:06   Titel: AW: Wenn wert groesser 0 dann zeile kopieren in neue Tabelle Version: Office 97
zum Fehler: hier fehlt ein Referenzierungs-Punkt (rot)
DatArr = Range(.Cells(5, 1), .Cells(.Cells(.Rows.Count, 1).End(xlUp).Row, 9))
  Thema: farbänderung von zellen 
Phelan XLPH

Antworten: 4
Aufrufe: 265

BeitragForum: Excel VBA (Makros)   Verfasst am: 04. Okt 2009, 06:53   Titel: AW: farbänderung von zellen Version: Office 2007
ins codefenster des Tabellenblattes:
-Rechtsklick auf TabellenReiter
-Code anzeigen
-hineinkopieren

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "K8" Then
With Range("G2:G17").Interior
Select Case Target
Case "Start": .Color = vbBlack
Case Else: .Color = RGB(216, 216, 216)
End Select
End With
End If
End Sub
  Thema: Wert einer dynamischen Zelle fixieren wenn Abfrage wahr 
Phelan XLPH

Antworten: 8
Aufrufe: 1067

BeitragForum: Excel VBA (Makros)   Verfasst am: 04. Okt 2009, 06:42   Titel: AW: Wert einer dynamischen Zelle fixieren wenn Abfrage wahr Version: Office XP (2002)
1. VBA Code als SummeUebertragen in das Blatt Auswertung kopiert.
2. Ein Modul eingefügt den Code hineinkopiert und als Deklaration bezeichnet.
...das widerspricht sich irgendwie

Leg den Code mal in ein Standard-Modul ab.
  Thema: Visual Basic Prozedur über Menü ausführen 
Phelan XLPH

Antworten: 3
Aufrufe: 456

BeitragForum: Excel VBA (Makros)   Verfasst am: 04. Okt 2009, 06:36   Titel: AW: Visual Basic Prozedur über Menü ausführen Version: Office 2003
Jetzt bin ich selber davon begeistert Smile
  Thema: Vba "bedingte formatierung" vor excel "beding 
Phelan XLPH

Antworten: 7
Aufrufe: 830

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. Okt 2009, 22:31   Titel: AW: Vba "bedingte formatierung" vor excel "be Version: Office XP (2002)
Poste mal deinen change-Code, mach jetzt schluss, morgen vielleicht wieder
  Thema: Fehler im Code 
Phelan XLPH

Antworten: 6
Aufrufe: 219

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. Okt 2009, 22:29   Titel: AW: Fehler im Code Version: Office 2003
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("Y14:Y45")) Is Nothing Then
Application.EnableEvents = False
With Intersect(Target, Range("Y14:Y45"))
.Value = IIf(.Cells(1) = "", "", "Abgestellt")
End With
Application.EnableEvents = True
End If
End Sub

...hätt ich nen Ferrari dann würde ich nicht hier sitzen und Codes tippen Laughing Laughing Laughing
  Thema: Vba "bedingte formatierung" vor excel "beding 
Phelan XLPH

Antworten: 7
Aufrufe: 830

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. Okt 2009, 22:21   Titel: AW: Vba "bedingte formatierung" vor excel "be Version: Office XP (2002)
Nimm es doch in deine Select Case Bedingung mit auf.
  Thema: suchen über comboboxe und alle gleichen werte zusammenzählen 
Phelan XLPH

Antworten: 14
Aufrufe: 350

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. Okt 2009, 22:18   Titel: AW: suchen über comboboxe und alle gleichen werte zusammenzä Version: Office XP (2002)
Eines habe ich ja schon gelernt - und zwar je genauer ein problem beschrieben
wird und dann noch mit Beispiel (Exceltabelle)desto besser kann einem geholfen werden.

...wenn doch nur alle diese Erkenntis gewinnen würden.

Wenn der mensch weiß was er will, dann kann er auch richtig danach fragen.

Denn:

Esgibt keine falschen Antworten, sondern nur falsche Frragen!
  Thema: Vba "bedingte formatierung" vor excel "beding 
Phelan XLPH

Antworten: 7
Aufrufe: 830

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. Okt 2009, 22:13   Titel: AW: Vba "bedingte formatierung" vor excel "be Version: Office XP (2002)
Ja, wie die Formeln eben...

Du solltest dich für eines der beiden entscheiden
  Thema: Fehler im Code 
Phelan XLPH

Antworten: 6
Aufrufe: 219

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. Okt 2009, 22:09   Titel: AW: Fehler im Code Version: Office 2003
da haste aber ne lahme Kutsche...

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("Y14:Y45")) Is Nothing Then
Application.EnableEvents = False
Intersect(Target, Range("Y14:Y45")) = "Abgestellt"
Application.EnableEvents = True
End If
End Sub
  Thema: suchen über comboboxe und alle gleichen werte zusammenzählen 
Phelan XLPH

Antworten: 14
Aufrufe: 350

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. Okt 2009, 22:05   Titel: AW: suchen über comboboxe und alle gleichen werte zusammenzä Version: Office XP (2002)
das Spielchen könnten wir jetzt bis eine Pyramide steht führen...
den rest überlasse ich pefeu
  Thema: Visual Basic Prozedur über Menü ausführen 
Phelan XLPH

Antworten: 3
Aufrufe: 456

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. Okt 2009, 21:55   Titel: AW: Visual Basic Prozedur über Menü ausführen Version: Office 2003
kljhdfvjwepjvjlsdvnslbn ksdbahvnas
  Thema: Fehler im Code 
Phelan XLPH

Antworten: 6
Aufrufe: 219

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. Okt 2009, 21:44   Titel: AW: Fehler im Code Version: Office 2003
meintest du vielleicht so?

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("Y14:Y45")) Is Nothing Then
Intersect(Target, Range("Y14:Y45")) = "Abgestellt"
End If
End Sub
  Thema: suchen über comboboxe und alle gleichen werte zusammenzählen 
Phelan XLPH

Antworten: 14
Aufrufe: 350

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. Okt 2009, 21:36   Titel: AW: suchen über comboboxe und alle gleichen werte zusammenzä Version: Office XP (2002)
von pefeu abgewndelt
 
Seite 533 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 530, 531, 532, 533, 534, 535, 536 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Gehe zu:  
Alle Zeiten sind
GMT + 1 Stunde

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Frontpage Forum