Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Die Suche hat 11580 Ergebnisse ergeben.
Seite 672 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 669, 670, 671, 672, 673, 674, 675 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Index
Autor Nachricht
  Thema: Worksheets werden extrem langsam beschrieben 
Phelan XLPH

Antworten: 11
Aufrufe: 285

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 17:20   Titel: AW: Worksheets werden extrem langsam beschrieben Version: Office 2003
Das mit Calculate das wirds wohl sein, falls du eine grße Mende an Formeln hast.
  Thema: schleife + link erstellen 
Phelan XLPH

Antworten: 22
Aufrufe: 892

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 17:16   Titel: AW: schleife + link erstellen Version: Office 2003
...habs immer noch nicht so richtig verstanden.

Sub Bsp()
Dim zell As Range
Dim strPfad As String
Dim strDatei As String
Dim intNr As Integer
Dim wks As Worksheet
Dim rngFund As Range

Set wks = Worksheets("Tabelle3")

strPfad = "D:\test\"
strDatei = "456_test.xls"

intNr = Val(strDatei)

Set rngFund = wks.Range("A1:A" & wks.Cells(wks.Rows.Count, 1).End(xlUp).Row).Find(intNr)

If Not rngFund Is Nothing Then
rngFund.Hyperlinks.Add Anchor:=rngFund, Address:=strPfad & strDatei, ScreenTip:=strPfad & strDatei, TextToDisplay:=strPfad & strDatei
End If

End Sub
  Thema: Worksheets werden extrem langsam beschrieben 
Phelan XLPH

Antworten: 11
Aufrufe: 285

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 16:56   Titel: AW: Worksheets werden extrem langsam beschrieben Version: Office 2003
Hallo, bei mir gehts ratzefatz. hab auch 2,1 GHZ Duo Core
  Thema: schleife + link erstellen 
Phelan XLPH

Antworten: 22
Aufrufe: 892

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 16:40   Titel: AW: schleife + link erstellen Version: Office 2003
...da musst du mir schon nene bsp geben wie der Zelleninhalt aussieht
  Thema: Scroll Area deaktivieren verhindern 
Phelan XLPH

Antworten: 20
Aufrufe: 9097

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 16:29   Titel: AW: Scroll Area deaktivieren verhindern Version: Office 2003
Ver- und Gebote sind Katalysatoren pubertierender Erwachsener. Very Happy
  Thema: Datenblatt auf Knopfdruck in neuer Mappe speichern 
Phelan XLPH

Antworten: 19
Aufrufe: 1085

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 16:25   Titel: AW: Datenblatt auf Knopfdruck in neuer Mappe speichern Version: Office 2003
wksZ wird doch "Kundenversion" zugewiesen!!!!????

Auszug:
Set wksQ = Worksheets("Preisliste") 'ggf. Anpassen
Set wksZ = Worksheets("Kundenversion") 'ggf. Anpassen
  Thema: schleife + link erstellen 
Phelan XLPH

Antworten: 22
Aufrufe: 892

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 16:18   Titel: AW: schleife + link erstellen Version: Office 2003
Hallo,

ein Bsp

Sub Bsp()
Dim zell As Range
For Each zell In Range("A1:A20")
zell.Hyperlinks.Add Anchor:=zell, Address:="", SubAddress:="Tabelle3!A" & zell.Row + 3, ScreenTip:="Zur Tabelle 3", TextToDisplay:="Tabelle3!A" & zell.Row + 3
Next
End Sub
  Thema: Wenn in der Zelle Text ist dann den Zellwert auf NULL aber.. 
Phelan XLPH

Antworten: 4
Aufrufe: 1430

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 16:06   Titel: AW: Wenn in der Zelle Text ist dann den Zellwert auf NULL ab Version: Office 2003
Hallo,

Sub test()
Dim zahl As Double
If IsNumeric(ActiveCell) Then
zahl = ActiveCell.Value
Else
ActiveCell = 0
End If
End Sub
  Thema: Excel Zeilen ausblenden 
Phelan XLPH

Antworten: 6
Aufrufe: 640

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 16:01   Titel: AW: Excel Zeilen ausblenden Version: Office 2007
...due verstehst mich falsch, das war kein Vorwurf, Anmerkung oder
Hinweis sondern nur eine Frage, da ich nicht weiss wie du auf -4 kommst.

jetzt leuchtets ein, wenn ich mir das 2.Bsp ansehe.

Ich dachte -4 sei ein Fehlerwert die aber lediglich 1-1000 reichen.
Denkfehler von mir. Smile
  Thema: Was passiert da? 
Phelan XLPH

Antworten: 3
Aufrufe: 222

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 15:50   Titel: AW: Was passiert da? Version: Office 2007
Also:

Das arrOut wird zuvor verkehrt herum gefüllt(d.h. Spalten und Zeilen sind
vertauscht).

ActiveSheet.Range("A1").Resize(UBound(arrOut, 2), UBound(arrOut)) = _
WorksheetFunction.Transpose(arrOut)

Transpose: Umwandlung von Zeilen in Spalten

Resize: Bereich Anpassen ausgehend von ,2)) = _
WorksheetFunction.Transpose(arrOut)

...es wird zu viel Platz reserviert Very Happy
  Thema: Was passiert da? 
Phelan XLPH

Antworten: 3
Aufrufe: 222

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 15:39   Titel: AW: Was passiert da? Version: Office 2007
...das könnte glatt von mir sein wenn ich mich nicht täusche Very Happy 8)
  Thema: Excel Zeilen ausblenden 
Phelan XLPH

Antworten: 6
Aufrufe: 640

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 15:18   Titel: AW: Excel Zeilen ausblenden Version: Office 2007
@eto... beschreib mal bitte die Gleichung!
  Thema: UserForm_Initialize erneut ausführen 
Phelan XLPH

Antworten: 2
Aufrufe: 924

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 15:17   Titel: AW: UserForm_Initialize erneut ausführen Version: Office 2003
hallo,

mit Unload Me statt .Hide, wird die Userform gänzlich geschlossen.
  Thema: Excel Zeilen ausblenden 
Phelan XLPH

Antworten: 6
Aufrufe: 640

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 15:14   Titel: AW: Excel Zeilen ausblenden Version: Office 2007
hallo Unbekannter,

Sub Zeile_Frachtkosten_ausblenden()
Sheets("Frachtkosten mit Menge").Select
Dim i As Integer
For i = 2 To 2000
If IsError(Cells(i, 10).Value) And _
IsError(Cells(i, 10).Value) And _
IsError(Cells(i, 10).Value) And _
IsError(Cells(i, 10).Value) Then
Rows(i).Hidden = True
End If
Next i
End Sub

...teste mal, kost nix Very Happy
  Thema: In festgelegter Matrix leere Zellen mit Nullen füllen 
Phelan XLPH

Antworten: 8
Aufrufe: 4982

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. Apr 2009, 15:05   Titel: AW: In festgelegter Matrix leere Zellen mit Nullen füllen Version: Office 2007
Hallo,

das ist auch net schlecht..

Sub NULLfueller()
On Error Resume Next
Range(Cells(1, 1), Cells(1000, 1000)).SpecialCells(xlCellTypeBlanks) = 0
If Err.Number <> 0 Then MsgBox Err.Description, , "Fehler: " & Err.Number
End Sub
 
Seite 672 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 669, 670, 671, 672, 673, 674, 675 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Gehe zu:  
Alle Zeiten sind
GMT + 1 Stunde

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