folder operations with vbs Free Excel Macros (VBA) | Excel Programs

Copy Macro

'For online Excel courses click: https://www.excelsizeyeter.com/excelwithkenan.com/udemy_giris.php 
 
1-Klasör Oluşturma 
Kod: 
Sub Klasor_olustur() 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
Set objFolder = objFSO.CreateFolder("C:YeniKlasor") 
End Sub

2-Klasör Adı Değiştirme 
Kod: 
Sub Klasor_ad_degistir() 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
objFSO.MoveFolder "C:YeniKlasoreski_adi", "C:YeniKlasoryeni_adi" 
End Sub

3-Klasör Silme 
Kod: 
Sub Klasor_sil() 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
objFSO.DeleteFolder ("C:YeniKlasor") 
End Sub

4-Klasör Taşıma 
Kod: 
Sub Klasor_tasi() 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
objFSO.MoveFolder "C:YeniKlasor", "D:YeniKlasor" 
End Sub

5-Klasör Kopyalama 
Kod: 
Sub Klasor_kopyala() 
Const OverWriteFiles = True 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
objFSO.CopyFolder "C:YeniKlasor", "C:EskiKlasor", OverWriteFiles 
End Sub

6-Alt Klasör Listesi 
Kod: 
Sub Klasor_altklasor_listesi() 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
Set objFolder = objFSO.GetFolder("C:YeniKlasor") 
Set colSubfolders = objFolder.Subfolders 
For Each objSubfolder In colSubfolders 
    MsgBox objSubfolder.Name, objSubfolder.Size 
Next 
End Sub

No	Macro Name
1	folder operations with vbs
2	desktop icon creation
3	excel operators hk
4	is the size of a file in bytes?
5	List the names of Excel files in a folder then give them a link
6	create shortcut to desktop
7	Search for a word in 30 excel files
8	specify file path and extension list in detail
9	opening txt file with notepad
10	open my documents folder with alt + f4
11	find and open excel files in file path
12	file search
13	api to create shortcut to my excel file on desktop
14	Open all Excel files in folder
15	prints the path and name of the file to the cell
16	a1e force to enter date with vba
17	Inputbox add year as summer
18	inserts months as sheet / pages Specifies days in detail
19	Write folder path to cell b1 list xls files
20	creates folder with book name save each sheet / page separately

Excel Free Macros (VBA)

Folder Operations With Vbs

Online Excel Courses

Services

How can we help you?

Subscribe to our Youtube Channel?

Keywords