Download Data Bursa Efek Indonesia gunakan PowerQuery Bag. III (Download Dokumen Pengumuman)

Jika pada bagian 2 ( baca http://eoditor.com/2020/12/download-data-bursa-efek-indonesia-gunakan-powerquery-bag-ii-info-perdagangan-saham/) kita membuka profil dan menarik data perdagangan maka dibagian ini agak sedikit berbeda cara penyedotan menggunakan PQ serta cara membuat link agar dokumen bisa didownload sekaligus

Dibagian ini penarikan menggunakan PQ tidak otomatis membuat Dokumen bisa didonlot oleh karena itu kita mesti gunakan formula agar data bisa didonlot

III.  Daftar Pengumuman

  1. Buka link Profil ACE Hardware
  2. https://www.idx.co.id/id/perusahaan-tercatat/profil-perusahaan-tercatat/ACES
  3. Klik pada tab Pengumuman, pilih tanggal 1 Jn 2023 sampai saat ini
  4. ini hasilnya capek kalo copy satu2
  5. seperti biasa tarik link gunakan inspect
  6. link yang didapat
  7. https://www.idx.co.id/primary/ListedCompany/GetProfileAnnouncement?KodeEmiten=ACES&indexFrom=0&pageSize=10&dateFrom=20230101&dateTo=20240803&lang=id&keyword=

     

  8. Kita bisa ganti pageSize=10 menjadipageSize=9999 agar semua tersedot
  9. Kita buka Excel
  10. Data-New Query-From Other Source-From web
  11. Isi link
  12. Jangan lupa ganti pageSize=10menjadi pageSize=9999 lalu OK
  13. ini hasilnya
  14. Klik List
  15. lalu klik To Table
  16. Trus Klik OK
  17. Kita mekarkan dengan klik kanan atas column1  lalu klik OK
  18. hasilnya akan ada 2 kolom
  19. Kita mekarkan yang pertama dengan klik tombol dideket nama kolom "Column1.Pengumuman"
  20. Klik OK saja atau pilih yang sesuai baru klik OK
  21. Pindah ke kolom ke 2 (posisi terakhir)  karena ini juga perlu dimekarkan
  22. Pilih Expand to new Row karena akan menambah Row (lihat gambar diatas record cuman 122)
  23. akan berubah menjadi 300
  24. kita mekarkan kolom attachmend karena masih berbentuk record
  25. ini hasilnya
  26. Kita bikin Field "DL" yang berisi full path dari file pengumuman
  27. Klik Add Column-Custom Colum
  28. Isi nama field dengan DL
  29. Isi Rumus dengan
  30. ="https://www.idx.co.id" & Text.Replace([Column1.attachments.FullSavePath],"\","/")
  31. Pindahkan ke Excel dengan klik Close & Load
  32. ini hasilnya
  33. hasilnya bisa didonlot gunakan Download Manager seperti yang pernah dibahas di http://eoditor.com/2020/05/cara-mendownload-risalah-putusan-pengadilan-pajak-secara-otomatis-versi-baru/
  34. Gampang kan

Catatan :

 

Bookmark the permalink.

Leave a Reply

Your email address will not be published. Required fields are marked *