Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Die Suche hat 11580 Ergebnisse ergeben.
Seite 730 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 727, 728, 729, 730, 731, 732, 733 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Index
Autor Nachricht
  Thema: Tabellenblatt an letzter Stelle einfügen 
Phelan XLPH

Antworten: 4
Aufrufe: 1260

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. März 2009, 14:58   Titel: AW: Tabellenblatt an letzter Stelle einfügen Version: Office 2003
Was ist jetzt genau dein Anliegen?

Wenn du konkret sagst ws du möchtest dann bekommst du es auch.
  Thema: Kettenstring in mehrere Zellen schreiben 
Phelan XLPH

Antworten: 1
Aufrufe: 885

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. März 2009, 14:56   Titel: AW: Kettenstring in mehrere Zellen schreiben Version: Office 2003
Bitte sehr,

Sub StringElementieren()
Dim s As String
Dim arr As Variant
Dim intI As Integer
s = "Hallo,Hans,du,hier"
arr = Split(s, ",")
For intI = 0 To UBound(arr)
Cells(intI + 2, 1) = arr(intI)
Next
End Sub

...schönen tag noch Smile
  Thema: Formular zu Formular mittels CommandButton 
Phelan XLPH

Antworten: 5
Aufrufe: 213

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. März 2009, 14:51   Titel: AW: Formular zu Formular mittels CommandButton Version: Office 2003
das in UF1:
Private Sub CommandButton1_Click()
UserForm2.Show 0
Me.Hide
End Sub

das in UF2:
Private Sub CommandButton1_Click()
UserForm1.Show 0
Me.Hide
End Sub

das in standardmodul:
Sub Test()
UserForm1.Show 0
End Sub

Irgendwie muss eine UF erstmal aufgerufen werden.
Hier UF1 ungebunden(0) ...das war glaug ich dein Problem.
  Thema: Formular zu Formular mittels CommandButton 
Phelan XLPH

Antworten: 5
Aufrufe: 213

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. März 2009, 14:09   Titel: AW: Formular zu Formular mittels CommandButton Version: Office 2003
Was sind das für buttons, sind die auf der Userform?

Nehme an es sind Activex-Elemente!

Private Sub CommandButton1_Click()
UserForm1.Show 0
End Sub

Private Sub CommandButton2_Click()
UserForm2.Show 0
End Sub
  Thema: Tabellenblätter zusammenfügen 
Phelan XLPH

Antworten: 5
Aufrufe: 345

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. März 2009, 11:02   Titel: AW: Tabellenblätter zusammenfügen Version: Office 2k (2000)
Probiers mal hiermit:

Nehme an dass manche Blätter aufgelistet sind die gar nicht existieren.

Sub BlattBereicheZusammenfuegen()
Dim wksZ As Worksheet
Dim zell As Range
Dim lngLZ As Long
Dim s As String

Set wksQ = Worksheets("Tabelle1")
Set wksZ = Worksheets.Add(After:=Sheets(1))
wksZ.Name = "BlaetterKonsol"

For Each zell In Worksheets("Tabelle1").Range("A3:A200")
lngLZ = wksZ.Cells(wksZ.Rows.Count, 1).End(xlUp).Row
On Error Resume Next
Worksheets(zell.Value).Range("A37:G200").Copy _
wksZ.Range("A" & lngLZ + 1)
If Err.Number > 0 Then
Err.Clear
s = s & zell.Value & vbLf
End If
Next

If s <> "" Then MsgBox "Folgende Blätter existieren nicht:" & vbLf & vbLf & s
End Sub
  Thema: Eingaben per VBA nur bis bestimmte Zeile erlauben!!! 
Phelan XLPH

Antworten: 14
Aufrufe: 1097

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. März 2009, 10:50   Titel: AW: Eingaben per VBA nur bis bestimmte Zeile erlauben!!! Version: Office 2003
Kopier es in ein Standardmodul und benenne ein Tabellenblatt
mit "Tabelle1". An dem solltest du es jetzt testen:

Bei Durschlauf des Makros wird es einmal gesetzt, beim nächsten mal
wieder zurückgesetzt.
prinzip: An,Aus,An,Aus.....


Prüfe nach jedem Durchlauf ob du in Zeile 501 gelangen kannst.
  Thema: Versch. Tabellen mittels VBA zusammenfügen 
Phelan XLPH

Antworten: 3
Aufrufe: 339

BeitragForum: Excel VBA (Makros)   Verfasst am: 03. März 2009, 00:45   Titel: AW: Versch. Tabellen mittels VBA zusammenfügen Version: Office 2007
Kannst du nochmal etwas genauer beschreiben was du möchtest?
  Thema: Listbox - schreibt nur 1. Auswahl 
Phelan XLPH

Antworten: 15
Aufrufe: 545

BeitragForum: Excel VBA (Makros)   Verfasst am: 02. März 2009, 23:15   Titel: AW: Listbox - schreibt nur 1. Auswahl Version: Office 2003
@pefeu

...hast du die Listbox auch in sortierter Form?
  Thema: Listbox - schreibt nur 1. Auswahl 
Phelan XLPH

Antworten: 15
Aufrufe: 545

BeitragForum: Excel VBA (Makros)   Verfasst am: 02. März 2009, 23:12   Titel: AW: Listbox - schreibt nur 1. Auswahl Version: Office 2003
Zur Info: geht auch mit Listbox

Private Sub ListBox1_Click()
Range("A1") = ListBox1.Value
End Sub
  Thema: Listbox - schreibt nur 1. Auswahl 
Phelan XLPH

Antworten: 15
Aufrufe: 545

BeitragForum: Excel VBA (Makros)   Verfasst am: 02. März 2009, 22:45   Titel: AW: Listbox - schreibt nur 1. Auswahl Version: Office 2003
Das gits doch nicht!

Was hast du in welche hilfe eingegeben (Excel- oder vba-hilfe)?

Was ist das für ein Steuerelement:

-Activex-Steuerelement
-Formular-Steuerelement

oder auf der Userform
  Thema: Listbox - schreibt nur 1. Auswahl 
Phelan XLPH

Antworten: 15
Aufrufe: 545

BeitragForum: Excel VBA (Makros)   Verfasst am: 02. März 2009, 22:33   Titel: AW: Listbox - schreibt nur 1. Auswahl Version: Office 2003
dann lösch doch einfach die listbox und setz ne neue
  Thema: Listbox - schreibt nur 1. Auswahl 
Phelan XLPH

Antworten: 15
Aufrufe: 545

BeitragForum: Excel VBA (Makros)   Verfasst am: 02. März 2009, 22:20   Titel: AW: Listbox - schreibt nur 1. Auswahl Version: Office 2003
und so?

wksT.Cells(lngLetzteZeile + 1, 14).Value = ListBox1.Text
  Thema: Suche nach Zelleninhalt und was Spezielles 
Phelan XLPH

Antworten: 4
Aufrufe: 312

BeitragForum: Excel VBA (Makros)   Verfasst am: 02. März 2009, 22:16   Titel: AW: Suche nach Zelleninhalt und was Spezielles Version: Office 2003
Weiss nicht genau was jetzt deine frage ist
  Thema: Listbox - schreibt nur 1. Auswahl 
Phelan XLPH

Antworten: 15
Aufrufe: 545

BeitragForum: Excel VBA (Makros)   Verfasst am: 02. März 2009, 22:14   Titel: AW: Listbox - schreibt nur 1. Auswahl Version: Office 2003
Hast du auch was in der Liste markiert?
  Thema: Prüfen ob Laufwerk vorhanden 
Phelan XLPH

Antworten: 5
Aufrufe: 4898

BeitragForum: Excel VBA (Makros)   Verfasst am: 02. März 2009, 22:08   Titel: AW: Prüfen ob Laufwerk vorhanden Version: Office XP (2002)
hi,

ich hoffe habs nicht zu kompliziert gemacht:

Sub LaufwerkOrdnerExistenz()
Dim fs As Object
Dim Pfad As String
Set fs = CreateObject("Scripting.FileSystemObject")
Pfad = "D:\test"
MsgBox "Laufwerk " & IIf(fs.DriveExists(Left(Pfad, 1)), "existiert!", "existiert nicht!"), , Pfad
MsgBox "Ordner " & IIf(fs.FolderExists(Pfad), "existiert!", "existiert nicht!"), , Pfad
End Sub


fs.DriveExists(Left(Pfad, 1)
fs.FolderExists(Pfad)

fettmarkiert in vba-hilfe eingeben
 
Seite 730 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 727, 728, 729, 730, 731, 732, 733 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Gehe zu:  
Alle Zeiten sind
GMT + 1 Stunde

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