Senin, 23 Februari 2026

download video/music from youtube online

 Download video/music from youtube online:


1. https://app.ytdown.to/id7/     (video aja)

2. https://www-y2mate.com/convert/   (bisa video dan music)

format flashdisk agar terbaca di macos

 Format flashdisk agar terbaca di macos menggunakan diskpart dan CMD


1. Hubungkan Flashdisk: Masukkan USB drive ke komputer Windows Anda.

2. Buka Command Prompt: Cari "CMD" atau "Command Prompt", klik kanan dan pilih Run as Administrator.

3. Jalankan Diskpart:

1. Ketik diskpart lalu tekan Enter.

2. Ketik list disk lalu tekan Enter untuk melihat daftar drive. Pastikan Anda mengenali nomor disk flashdisk berdasarkan ukurannya (misal: Disk 2).

3. Ketik select disk [nomor disk] (contoh: select disk 2) lalu tekan Enter. Hati-hati: jangan salah pilih disk.

4. Hapus dan Format:

1. Ketik clean lalu tekan Enter untuk menghapus semua data.

2. Ketik create partition primary lalu tekan Enter.

3. Ketik format fs=exfat quick lalu tekan Enter

- jika ingin menambahkan nama pada flasdisknya tambahkan kata label setelah kata quick contoh: label="musikku"

- (Format exFAT direkomendasikan agar bisa digunakan di macOS dan Windows untuk file > 4GB).

4. Ketik assign lalu tekan Enter untuk memberikan huruf drive.

5. Ketik exit lalu tekan Enter untuk keluar dari Diskpart. 

Catatan Penting:

-  Format ExFAT/FAT32: Wajib agar macOS bisa membaca dan menulis data (native support).

-  Alternative di Mac: Anda bisa menggunakan Disk Utility > Erase > Pilih ExFAT

-  Setelah memilih select disk, jika anda masih ragu di disk yang mana anda berada, gunakan perintah detail (opsional):  anda bisa memilih salah satu nomor disk lalu mengetik detail disk untuk melihat nama model perangkatnya (seperti "USB SanDisk" atau "Kingston")

- jika hanya menggunakan cmd (administrator) saja dapat menggunakan perintah sebagai berikut:

format E: /fs:exFAT /v:NamaFlashdisk /q

E: : Ganti dengan huruf drive flashdisk Anda.

/fs:exFAT : Menentukan sistem file tujuan.

/v:  : Memberi label (Ganti NamaFlashdisk dengan nama yang kamu inginkan.)

/q : Melakukan format cepat (quick format)

 

Perbedaan Utama:

Diskpart: Lebih "sakti" karena bisa menghapus partisi yang error atau membagi partisi baru, tapi langkahnya panjang.

CMD Biasa (format): Jauh lebih praktis jika tujuannya hanya ingin memformat ulang satu drive yang sudah terbaca hurufnya (seperti drive E, F, atau G).

Tips: Di macOS, label disk yang terlalu panjang terkadang dipotong atau diubah menjadi huruf kapital semua. Sebaiknya gunakan nama yang singkat dan tanpa karakter unik

Kamis, 03 Oktober 2024

file dengan ekstensi .docx, .doc, dan .rtf sekaligus ke pdf


Jika Anda ingin mengonversi banyak file extension doc, docx, rtf ke PDF sekaligus menggunakan makro di Microsoft Word, Anda bisa menggunakan kode VBA. Berikut adalah langkah-langkahnya:

  1. Buka Microsoft Word dan pastikan tab “Developer” sudah aktif. Jika belum, aktifkan melalui File > Options > Customize Ribbon dan centang “Developer”.

  2. Buka Editor VBA dengan menekan Alt + F11.

  3. Buat Modul Baru:

    • Klik pada proyek “Normal”.
    • Pilih Insert > Module.
  4. Tempelkan Kode Makro berikut ke dalam modul:

Sub BatchConvertDocToPDF()
    Dim objWord As Object
    Dim objDoc As Object
    Dim strFolder As String
    Dim strFile As String
    Dim strDocName As String
    Dim strPDFName As String

    ' Set the folder path
    strFolder = "C:\Path\To\Your\Word\Files\"

    ' Create a new Word application object
    Set objWord = CreateObject("Word.Application")
    objWord.Visible = False

    ' Loop through all Word files in the folder
    strFile = Dir(strFolder & "*.docx")
    Do While strFile <> ""
        ' Open the Word document
        Set objDoc = objWord.Documents.Open(strFolder & strFile)
        
        ' Set the PDF file name
        strDocName = Left(strFile, InStrRev(strFile, ".") - 1)
        strPDFName = strFolder & strDocName & ".pdf"
        
        ' Export the document as PDF
        objDoc.ExportAsFixedFormat _
            OutputFileName:=strPDFName, _
            ExportFormat:=wdExportFormatPDF, _
            OpenAfterExport:=False, _
            OptimizeFor:=wdExportOptimizeForPrint, _
            Range:=wdExportAllDocument, _
            Item:=wdExportDocumentContent
        
        ' Close the Word document
        objDoc.Close False
        
        ' Get the next file
        strFile = Dir
    Loop

    ' Repeat for .doc files
    strFile = Dir(strFolder & "*.doc")
    Do While strFile <> ""
        ' Open the Word document
        Set objDoc = objWord.Documents.Open(strFolder & strFile)
        
        ' Set the PDF file name
        strDocName = Left(strFile, InStrRev(strFile, ".") - 1)
        strPDFName = strFolder & strDocName & ".pdf"
        
        ' Export the document as PDF
        objDoc.ExportAsFixedFormat _
            OutputFileName:=strPDFName, _
            ExportFormat:=wdExportFormatPDF, _
            OpenAfterExport:=False, _
            OptimizeFor:=wdExportOptimizeForPrint, _
            Range:=wdExportAllDocument, _
            Item:=wdExportDocumentContent
        
        ' Close the Word document
        objDoc.Close False
        
        ' Get the next file
        strFile = Dir
    Loop

    ' Repeat for .rtf files
    strFile = Dir(strFolder & "*.rtf")
    Do While strFile <> ""
        ' Open the Word document
        Set objDoc = objWord.Documents.Open(strFolder & strFile)
        
        ' Set the PDF file name
        strDocName = Left(strFile, InStrRev(strFile, ".") - 1)
        strPDFName = strFolder & strDocName & ".pdf"
        
        ' Export the document as PDF
        objDoc.ExportAsFixedFormat _
            OutputFileName:=strPDFName, _
            ExportFormat:=wdExportFormatPDF, _
            OpenAfterExport:=False, _
            OptimizeFor:=wdExportOptimizeForPrint, _
            Range:=wdExportAllDocument, _
            Item:=wdExportDocumentContent
        
        ' Close the Word document
        objDoc.Close False
        
        ' Get the next file
        strFile = Dir
    Loop

    ' Quit Word application
    objWord.Quit

    ' Clean up
    Set objDoc = Nothing
    Set objWord = Nothing

    MsgBox "All files have been converted to PDF.", vbInformation
End Sub
  1. Jalankan Makro dengan menekan F5 atau melalui menu Run > Run Sub/UserForm.

Pastikan untuk mengganti C:\Path\To\Your\Word\Files\ dengan path folder yang berisi file Word Anda. Makro ini akan mengonversi semua file .docx, doc, dan rtf dalam folder tersebut menjadi PDF dan menyimpannya di lokasi yang sama.