Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Die Suche hat 11580 Ergebnisse ergeben.
Seite 341 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 338, 339, 340, 341, 342, 343, 344 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Index
Autor Nachricht
  Thema: Abbruch Copy/Pastespecial mit Fehlermeldung 
Phelan XLPH

Antworten: 11
Aufrufe: 1003

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 22:41   Titel: AW: Abbruch Copy/Pastespecial mit Fehlermeldung Version: Office 2010
Hier
  Thema: Kommentare setzen lassen 
Phelan XLPH

Antworten: 6
Aufrufe: 195

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 16:55   Titel: AW: Kommentare setzen lassen Version: Office 2010
Es muss um eine Zeile erhöht werden:
ReDim arSuch(1 To sh.Cells(sh.Rows.Count, 6).End(xlUp).Row + 1, 1 To 37)
arSuch = sh.Range(sh.Cells(1, 1), sh.Cells(sh.Cells(sh.Rows.Count, 6).End(xlUp).Row + 1, 37))
For i = 6 To sh.Cells(sh.Rows.Count, 6).End(xlUp).Row + 1 Step 6
  Thema: Abbruch Copy/Pastespecial mit Fehlermeldung 
Phelan XLPH

Antworten: 11
Aufrufe: 1003

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 16:27   Titel: AW: Abbruch Copy/Pastespecial mit Fehlermeldung Version: Office 2010
Dazu müsste ich deine Tabelle sehen. kannst du die irgendwo hochladen?
Hier bist du ja nicht registriert.
  Thema: Division von Werten einer festen Range 
Phelan XLPH

Antworten: 3
Aufrufe: 536

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 16:22   Titel: AW: Division von Werten einer festen Range Version: Office 2003
Hallo,

1. Schreibe in [P1] >> 1000
2. Schreibe in [Q1] >> 2
3. Kopiere [P1]
4. Markiere [A2:N500]
5. Rechtsklick im markierten Bereich > "Inhalte einfügen..." > Subtrahieren > OK
6. Kopiere [Q1]
7. Markiere [A2:N500]
8. Rechtsklick im markierten Bereich > "Inhalte einfügen..." > Dividieren > OK
  Thema: Kommentare setzen lassen 
Phelan XLPH

Antworten: 6
Aufrufe: 195

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 16:16   Titel: AW: Kommentare setzen lassen Version: Office 2010
Wie ist das Kennwort???
  Thema: Jede 5. Zeile behalten? 
Phelan XLPH

Antworten: 4
Aufrufe: 536

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 16:13   Titel: AW: Jede 5. Zeile behalten? Version: Office 2007
Sub ph_Delete()
With Tabelle2.UsedRange
With .Columns(.Columns.Count).Offset(, 1)
.Formula = "=IF(MOD(ROW()+1,5)*(ROW()>4),1,"""")"
.Value = .Value
.EntireRow.Sort .Cells(1), xlAscending, Header:=xlNo
On Error Resume Next
.SpecialCells(xlCellTypeConstants, xlNumbers).EntireRow.Delete
On Error GoTo 0
.ClearContents
End With
End With
End Sub
  Thema: Abbruch Copy/Pastespecial mit Fehlermeldung 
Phelan XLPH

Antworten: 11
Aufrufe: 1003

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 16:02   Titel: AW: Abbruch Copy/Pastespecial mit Fehlermeldung Version: Office 2010
Setze das
Application.CutCopyMode = False
direkt unter
.PasteSpecial xlPasteValues

denn dieses leert den Zwischenspeicher.
  Thema: Sich in einer Zelle verändernde Werte miteinandervergleichen 
Phelan XLPH

Antworten: 5
Aufrufe: 274

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 15:57   Titel: AW: Sich in einer Zelle verändernde Werte miteinanderverglei Version: Office XP (2002)
In welchem tabellenblatt sind die Daten? Wie sieht die Tabelle aus.
Aus dem Internet kommt viel unnötiger Krimskrams.
  Thema: Mehrfachverwendung von "Private Sub" 
Phelan XLPH

Antworten: 25
Aufrufe: 1798

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 15:54   Titel: AW: Mehrfachverwendung von "Private Sub" Version: Office 2003
Ich denk es sind Formular-Steuerelemente.

Wenn du mit rechtsklick auf eines "Makro zuweisen..." auswählen kannst,
dann ist es ein Formular-Steuerelement.
  Thema: Counta zählt alle nichtleeren Zellen, aber verbundene Zellen 
Phelan XLPH

Antworten: 7
Aufrufe: 418

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 15:49   Titel: AW: Counta zählt alle nichtleeren Zellen, aber verbundene Ze Version: Office 2003
Deswegen sollten verbundene Zellen vermieden werden, wenn es um
Datenbank-Operationen geht.

Sortieren, Filtern , Funktionen reagieren "allergisch" auf verbundene Zellen.
  Thema: Sich in einer Zelle verändernde Werte miteinandervergleichen 
Phelan XLPH

Antworten: 5
Aufrufe: 274

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 15:39   Titel: AW: Sich in einer Zelle verändernde Werte miteinanderverglei Version: Office XP (2002)
Sind Monologe nicht was tolles? Shock Very Happy

Dazu solltest du die Vorwerte irgendwo zwischenspeichern damit die
Differenzwerte ermittelt werden können.
  Thema: Counta zählt alle nichtleeren Zellen, aber verbundene Zellen 
Phelan XLPH

Antworten: 7
Aufrufe: 418

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 15:36   Titel: AW: Counta zählt alle nichtleeren Zellen, aber verbundene Ze Version: Office 2003
Warum 3? In B1 steht ja nix drin.
  Thema: Mehrfachverwendung von "Private Sub" 
Phelan XLPH

Antworten: 25
Aufrufe: 1798

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 15:13   Titel: AW: Mehrfachverwendung von "Private Sub" Version: Office 2003
...auf ActiveX-Steuerelemte aber schon!

Was hast du denn für Steuerelemente?
  Thema: Mehrdimensionales Array sortieren 
Phelan XLPH

Antworten: 8
Aufrufe: 20894

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 15:09   Titel: AW: Mehrdimensionales Array sortieren
hat da wer ne Lösung, oder muß ich selbst den Code durchstudieren um den Fehler zu suchen ???

...ja wenns nicht zu viel verlangt ist Shock

Schreibs ins Blatt zurück, sortiere und lies es wieder ein.
  Thema: Abbruch Copy/Pastespecial mit Fehlermeldung 
Phelan XLPH

Antworten: 11
Aufrufe: 1003

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Dez 2010, 15:07   Titel: AW: Abbruch Copy/Pastespecial mit Fehlermeldung Version: Office 2010
Versuch2:

Sub Test2()
Dim X As Integer
Dim N As Integer
Dim P As Integer
N = 20 '20 Spalten pro Loop
X = 9 'Erste Spalte des Kopiervorgangs

With Workbooks("test.xlsm").Sheets("3 Liquiditätsberechnung")
P = Int(Val(.Cells(2, 5).Value)) + 9
For i = 9 To P Step N
.Range("h2:h409").Copy .Range(.Cells(2, i), .Cells(2, i + N))
With .Range(.Cells(2, i), .Cells(2, i + N)).EntireColumn
.Copy
.PasteSpecial xlPasteValues
End With
Next
Application.CutCopyMode = False
End With
End Sub
 
Seite 341 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 338, 339, 340, 341, 342, 343, 344 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Gehe zu:  
Alle Zeiten sind
GMT + 1 Stunde

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Word VBA