< návrat zpět

MS Excel


Téma: Vytváření složek dle označených buněk rss

Zaslal/a 4.5.2022 12:56

Ahoj,

Našel jsem zde a trošku modifkoval pro sebe následující makro. Zjednodušeně mi vytváří složky, které obsahují další dvě stabilní a neměné složky dle seznamu staveb. Ovšem rád bych toto ještě upravil tak, aby makro vytvořilo složky pouze z aktivních buněk. Např. při použití filtru,

Kód:
Sub VyvorSlozku_SUNSET_AMICOM()

Dim xdir As String

Dim lstrow As Long

Dim i As Long

lstrow = ActiveSheet.Cells(ActiveSheet.Rows.Count, "B").End(xlUp).Row

For i = 3 To lstrow

xdir = "C:\Users\Petr.Zemek\Desktop\Práce\VB\AMICOM\" & Range("B" & i).Value

On Error Resume Next

MkDir xdir

If Err.Number = 0 Then 'když existuje, jde dál

MkDir xdir & "\Podklady"
MkDir xdir & "\Výstavba"

End If

On Error GoTo 0

Next

End Sub

Díky za rady

Zaslat odpověď >

Strana:  « předchozí  1 2
#056240
avatar
Jde o opakované vytváření struktury adresářů s případnou drobnou modifikací. A k tomu nemusím spouštět Excel (což trvá mnohem déle než 0.01 sec. 1 ).citovat
#056243
avatar

lubo napsal/a:

Jde o opakované vytváření struktury adresářů s případnou drobnou modifikací. A k tomu nemusím spouštět Excel (což trvá mnohem déle než 0.01 sec. ).


No jde o to , že ten excel slouží jako databáze staveb/ projektů. Tam je asistenti zapisují a následně si projekt manažeři dle potřeby vytváří složky pro své projekty. Tzn že jak je projekt přiřazen dané osobě tak si založí třeba 15 složek pro stavby které s v excelové databázi označí. Proto ta interakce s excelem potřebná je a asi jednoduší než přes BATcitovat

Strana:  « předchozí  1 2

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

kontrola buniek

Anonym • 27.5. 17:33

kontrola buniek

elninoslov • 27.5. 15:58

zoradit a zratat

elninoslov • 27.5. 15:16

Hromadné přepsání

Nomi • 27.5. 15:15

kontrola buniek

loksik.lubos • 27.5. 15:08

zoradit a zratat

lubo • 27.5. 13:23

kontrola buniek

elninoslov • 27.5. 12:56