Em chào anh. Em thấy anh rất giỏi về việc lấy số liệu trên Web như File lấy số liệu chứng khoán quá khó và hay. Lúc nào em nhờ anh giải yêu cầu này được không ạ.Bài viết này tôi chia sẻ với các bạn 2 file thực hiện lấy dữ liệu thời tiết từ nguồn AccuWeather
File WheatherAccu.xlsb với code thực hiện lấy dữ liệu đơn giản nên mất nhiều thời gian hơn.
Với WheatherAccu_Async.xlsb thì code rất phức tạp để sử dụng cơ chế Bất đồng bộ khi dùng phương thức Request HTTP, nên lấy dữ liệu rất nhanh nếu dữ liệu có nhiều tháng.
Sau khi sử dụng ứng dụng, nếu gặp vấn đề các bạn có thể đăng bài bên dưới để được giải đáp.
----------------------------------
View attachment 238362
www.giaiphapexcel.com
Em vẫn bị lỗi vậy bác ạ.@cuto24, @naturooo, @quyenpv
Các bạn thử tải lại file.
----------------------------------------------
@hoahuongduong1986
Nếu bạn làm được bằng Python, thì bạn đăng code Python vào chủ đề của bạn và tag tên của tôi vào, được thì tôi sẽ xem qua giúp bạn.
Trước mắt là tôi thấy trang của bạn cần lấy dữ liệu qua nhiều lớp bảo mật với API nghiêm ngặt.
e vẫn bị lỗi đấy@cuto24, @naturooo, @quyenpv
Các bạn thử tải lại file.
----------------------------------------------
@hoahuongduong1986
Nếu bạn làm được bằng Python, thì bạn đăng code Python vào chủ đề của bạn và tag tên của tôi vào, được thì tôi sẽ xem qua giúp bạn.
Trước mắt là tôi thấy trang của bạn cần lấy dữ liệu qua nhiều lớp bảo mật với API nghiêm ngặt.
Dạ, em gửi anh rồi đó ạ. Em cảm ơn!@cuto24, @naturooo, @quyenpv
Các bạn thử tải lại file.
----------------------------------------------
@hoahuongduong1986
Nếu bạn làm được bằng Python, thì bạn đăng code Python vào chủ đề của bạn và tag tên của tôi vào, được thì tôi sẽ xem qua giúp bạn.
Trước mắt là tôi thấy trang của bạn cần lấy dữ liệu qua nhiều lớp bảo mật với API nghiêm ngặt.
Em tải về cũng không chạy được Anh ạVì một số bạn không biết kỹ thuật gán tất cả Đối tượng (Hình Ảnh ,Shape,..) Vào một Macro duy nhất trong hai File ở trên,
nên tôi sửa file lại thành các Macro đơn lẻ, để đơn giản hơn trong việt gọi một Macro.
-------------------------------
Máy Anh có UltraViewer khôngBạn Copy đoạn này vào thử xem được không.
PHP:Sub Test() With ThisWorkbook.Worksheets("Th" & ChrW(7901) & "i ti" & ChrW(7871) & "t") Call GetWheather(.[D2], .[B3], .[D3], .[A6]) End With End Sub
@PacificPR , @quyenpv
Hoặc các bạn Inbox cho tôi Teamview để tôi xem sao.
Phiên Anh giúp trên máy em tí nhé-------------------------------------------
Bạn tải lại file trên vào code VBA export class module có tên ClsHtmlWorker xem có 2 dòng code:
Attribute OnReadyStateChange.VB_UserMemId = 0
'Attribute OnReadyStateChange.VB_UserMemId = 0
Nếu không thì bỏ dấu nháy ' lưu lại và Import vào lại File.
Không được nữa thì đành UltraViewer.
Dạ. Em đang ra ngoài. Sáng em gửi Anh nhéBạn kiểm tra đoạn code này và chụp màn hình giúp tôi
PHP:Private Sub Sub_Test() With VBA.CreateObject("MSXML2.XMLHTTP") .Open "GET", "https://www.giaiphapexcel.com/diendan/whats-new/", False .setRequestHeader "Content-type", "application/x-www-form-urlencoded" .setRequestHeader "X-Requested-With", "XMLHttpRequest" .Send MsgBox .responseText End With End Sub
Em chạy đoạn Code của Anh nó ra như thế này Anh ạ@cuto24, @naturooo, @quyenpv @PacificPR
Tôi phát hiện ra rằng:
Code khi thực hiện trên máy của tôi lại có thể request được site AccuWheather, nhưng sang máy khác thì AccuWheather không trả lại bất kì điều gì.
Thực sự là không tôi không hiểu vấn đề là do phía AccuWheather hay do Phiên bản Office.
Nếu phát hiện được thì tôi sẽ cập nhật để các bạn biết.
e nghĩ có khi nào do vị trí hoặc khu vực cài trên máy tính không?@cuto24, @naturooo, @quyenpv @PacificPR
Tôi phát hiện ra rằng:
Code khi thực hiện trên máy của tôi lại có thể request được site AccuWheather, nhưng sang máy khác thì AccuWheather không trả lại bất kì điều gì.
Thực sự là không tôi không hiểu vấn đề là do phía AccuWheather hay do Phiên bản Office.
Nếu phát hiện được thì tôi sẽ cập nhật để các bạn biết.
chắc ko phải chứ ,mình chạy cả trên WPS cũng không đượcEm đoán do office 32bit. Mấy máy lỗi đều office 32bit cả a ạ!
Được rồi Anh ạ. Code của Anh chạy rất nhanh. Em đã thử lấy dữ liệu từ năm 2018 đến bây bây giờ nó chạy cái vèo là xong. Trong khi đó cái Code cũ của em lấy dữ liệu 3 năm nó mất khoảng 3 phút gì đó@Cu Tồ, @naturooo, @quyenpv @PacificPR
Các bạn test lại 2 file này xem sao
---------------------------------
Cả 2 file đều chạy ổn, nhanh. Tks tác giả!@Cu Tồ, @naturooo, @quyenpv @PacificPR
Các bạn test lại 2 file này xem sao
---------------------------------
@Cu Tồ, @naturooo, @quyenpv @PacificPR
Các bạn test lại 2 file này xem sao
---------------------------------


File chạy tốt anh, tuy nhiên file icon thời tiết bị lỗi không hiển thị ảnh@Cu Tồ, @naturooo, @quyenpv @PacificPR
Các bạn test lại 2 file này xem sao
---------------------------------
File WheatherAccu_Async mới không lấy được dữ liệu Anh ạBạn tải lại File và thử lại, nếu còn các dòng màu đỏ và chứa dấu ? thì bạn chụp lại.
@Cu Tồ, @NghiaKieu, @quyenpv @PacificPR
File còn mắc lỗi thông dịch Code VBA nên các bạn tải lại
Link File
Bạn tải lại File và thử lại, nếu còn các dòng màu đỏ và chứa dấu ? thì bạn chụp lại.
@Cu Tồ, @NghiaKieu, @quyenpv @PacificPR
File còn mắc lỗi thông dịch Code VBA nên các bạn tải lại
Link File
vâng mà sao a biết máy e dùng ngôn ngữ nước ngoài hay vậy?Excel của bạn hoạt động với ngôn ngữ tiếng Nhật,
Nhưng tôi không thể chuyển Window của mình sang tiếng Nhật để kiểm tra được.
Icon thời tiết định dạng PNG, Có thể do Office 32bit không hỗ trợ hiển thị PNG
Bạn thử vào Layout chọn Selection Pane click hiển thị 1 IconWheatherxxx xem có nhìn thấy không
Insert picture định dạng png vẫn thấy OK màIcon thời tiết định dạng PNG, Có thể do Office 32bit không hỗ trợ hiển thị PNG
Anh ơi sao em tải về và chạy code thì không có tác động ạ?@Cu Tồ, @naturooo, @quyenpv @PacificPR
Các bạn test lại 2 file này xem sao
---------------------------------
Vâng em cảm ơn anh, mong anh giúp đỡ để mọi người có thể dùng để phục vụ công việcTừ tháng 5 đến giờ thì Website Weather đã cập nhật mới rồi, phải sửa code lại. Các bạn chờ bản cập nhật.
Tại github:
![]()
SanbiVN/WeatherXL_VN
Lấy dữ liệu thời tiết với ứng dụng Excel. Contribute to SanbiVN/WeatherXL_VN development by creating an account on GitHub.github.com
Em không tải được file Anh ạ. Anh cho em hỏi Anh có lấy được dữ liệu mưa không AnhTừ tháng 5 đến giờ thì Website Weather đã cập nhật mới rồi, phải sửa code lại. Các bạn chờ bản cập nhật.
Tại github:
![]()
SanbiVN/WeatherXL_VN
Lấy dữ liệu thời tiết với ứng dụng Excel. Contribute to SanbiVN/WeatherXL_VN development by creating an account on GitHub.github.com
Em chào anh, em chạy code thấy báo lỗi và định dạng ngày ở sheet (Thơif tiết (2)) lại không theo ngày/tháng/năm vậy anh?***Đã cập nhật ứng dụng vào lúc: 15:50 25/1/2021
Bài viết này tôi chia sẻ với các bạn 2 file thực hiện lấy dữ liệu thời tiết từ nguồn AccuWeather
File WheatherAccu.xlsb với code thực hiện lấy dữ liệu đơn giản nên mất nhiều thời gian hơn.
Với WheatherAccu_Async.xlsb thì code rất phức tạp để sử dụng cơ chế Bất đồng bộ khi dùng phương thức Request HTTP, nên lấy dữ liệu rất nhanh nếu dữ liệu có nhiều tháng.
Sau khi sử dụng ứng dụng, nếu gặp vấn đề các bạn có thể đăng bài bên dưới để được giải đáp.
----------------------------------
View attachment 238362



Phiên bản bạn đang sử dụng chỉ có Sheet THỜI TIẾT HÀNG NGÀY hoạt động.Em chào anh, em chạy code thấy báo lỗi và định dạng ngày ở sheet (Thơif tiết (2)) lại không theo ngày/tháng/năm vậy anh?
Xin được anh giúp!
giaiphapexcel.com
Vâng cảm ơn anh! mong anh phát triển các sheet còn lại để mọi người được ứng dụng.Phiên bản bạn đang sử dụng chỉ có Sheet THỜI TIẾT HÀNG NGÀY hoạt động.
Các sheet còn lại tôi đang phát triển, do lười biếng phát triển thêm nên tôi đăng phiên bản này lên để tạm thời thôi.
Bạn cần kiểm tra TLS đã cài đặt chưa, để chạy bất đồng bộ:
![]()
TaxCodeTCT v1.15 - Tra cứu thông tin nộp thuế từ Tổng Cục Thuế (**04/01/2024)
Hôm nay tôi chia sẻ cho các bạn ứng dụng hoàn toàn mới, dùng để tra cứu thông tin nộp thuế từ Tổng Cục Thuế. Giúp các bạn thuận tiện trong việc tra cứu thông tin nộp thuế. Nhấn để tải về TaxCode Nguồn tải dự phòng: https://github.com/SanbiVN/TaxCodeVN Hướng dẫn Xem hình ảnh hướng dẫn: 1...giaiphapexcel.com
Còn không thì bạn chạy thủ tục trong Module ..._Copy
Em cài theo anh hướng dẫn mà chạy code vẫn không tác động anh.Phiên bản bạn đang sử dụng chỉ có Sheet THỜI TIẾT HÀNG NGÀY hoạt động.
Các sheet còn lại tôi đang phát triển, do lười biếng phát triển thêm nên tôi đăng phiên bản này lên để tạm thời thôi.
Bạn cần kiểm tra TLS đã cài đặt chưa, để chạy bất đồng bộ:
![]()
TaxCodeTCT v1.15 - Tra cứu thông tin nộp thuế từ Tổng Cục Thuế (**04/01/2024)
Hôm nay tôi chia sẻ cho các bạn ứng dụng hoàn toàn mới, dùng để tra cứu thông tin nộp thuế từ Tổng Cục Thuế. Giúp các bạn thuận tiện trong việc tra cứu thông tin nộp thuế. Nhấn để tải về TaxCode Nguồn tải dự phòng: https://github.com/SanbiVN/TaxCodeVN Hướng dẫn Xem hình ảnh hướng dẫn: 1...giaiphapexcel.com
Còn không thì bạn chạy thủ tục trong Module ..._Copy

Cảm ơn anh rất nhiều!Cập nhật mới nhất: 13:30 7/5/2021
@PacificPR, @QuangMinhtb @dephetnoi @quyenpv @NghiaKieu @Hau151978
Sheet (THỜI TIẾT ACCU) em thấy thời gian ở cột A theo thứ tự tăng dần từ trên xuống dưới.Ứng dụng Excel lấy dữ liệu Thời tiết siêu nhanh
***Cập nhật mới nhất: 13:30 7/5/2021
+ Nguồn dữ liệu mới từ FreeMeteo.VN
Bài viết này tôi chia sẻ với các bạn ứng dụng Excel sử dụng VBA lấy dữ liệu thời tiết từ nguồn FreeMeteo và AccuWeather rất nhanh.
Giúp ích nhiều cho các bạn viết ứng dụng thi công trình cần dữ liệu thời tiết.
Ứng dụng sử dụng cơ chế Bất đồng bộ của HTTP nên có thể sẽ không hoạt động trên Window 32 bit. Hoặc máy tính các bạn sử dụng là máy công ty đã bị khóa truy cập.
Một số máy có thể không chạy do cài đặt UseAgent cho HTTP không phù hợp. Vì vậy nên các bạn cần cập nhật biến const UseAgent từ trình duyệt Chrome.
Các bạn có thể Liên hệ với tôi qua Facebook: https://m.me/he.sanbi/ để hỏi về ứng dụng.
Sau khi sử dụng ứng dụng, nếu gặp vấn đề các bạn có thể đăng bài bên dưới để được giải đáp.
----------------------------------
WeatherXL
Dữ liệu thời tiết trực tuyến từ nguồn freeMeteo và AccuWeather
![]()
Vâng! được rồi anhQuangMinhtb
Bạn sửa bài viết xóa phần trích dẫn, chỉ @tên thôi.
Sheet (THỜI TIẾT METEO) Có mũi tên bạn chỉ cần click vào nó để điều chỉnh thứ tự sắp xếp
Em chạy bản mới cập nhập thấy báo lỗi sau anh:Ứng dụng Excel lấy dữ liệu Thời tiết siêu nhanh
***Cập nhật mới nhất: 12:20 8/5/2021
+ Nguồn dữ liệu mới từ FreeMeteo.VN
Bài viết này tôi chia sẻ với các bạn ứng dụng Excel sử dụng VBA lấy dữ liệu thời tiết từ nguồn FreeMeteo và AccuWeather rất nhanh.
Giúp ích nhiều cho các bạn viết ứng dụng thi công trình cần dữ liệu thời tiết.
Ứng dụng sử dụng cơ chế Bất đồng bộ của HTTP nên có thể sẽ không hoạt động trên Window 32 bit. Hoặc máy tính các bạn sử dụng là máy công ty đã bị khóa truy cập.
Một số máy có thể không chạy do cài đặt UseAgent cho HTTP không phù hợp. Vì vậy nên các bạn cần cập nhật biến const UseAgent từ trình duyệt Chrome.
Các bạn có thể Liên hệ với tôi qua Facebook: https://m.me/he.sanbi/ để hỏi về ứng dụng.
Sau khi sử dụng ứng dụng, nếu gặp vấn đề các bạn có thể đăng bài bên dưới để được giải đáp.
----------------------------------
WeatherXL
Dữ liệu thời tiết trực tuyến từ nguồn freeMeteo và AccuWeather
![]()
Em chạy bản mới cập nhập thấy báo lỗi sau anh:Ứng dụng Excel lấy dữ liệu Thời tiết siêu nhanh
***Cập nhật mới nhất: 12:20 8/5/2021
+ Nguồn dữ liệu mới từ FreeMeteo.VN
Bài viết này tôi chia sẻ với các bạn ứng dụng Excel sử dụng VBA lấy dữ liệu thời tiết từ nguồn FreeMeteo và AccuWeather rất nhanh.
Giúp ích nhiều cho các bạn viết ứng dụng thi công trình cần dữ liệu thời tiết.
Ứng dụng sử dụng cơ chế Bất đồng bộ của HTTP nên có thể sẽ không hoạt động trên Window 32 bit. Hoặc máy tính các bạn sử dụng là máy công ty đã bị khóa truy cập.
Một số máy có thể không chạy do cài đặt UseAgent cho HTTP không phù hợp. Vì vậy nên các bạn cần cập nhật biến const UseAgent từ trình duyệt Chrome.
Các bạn có thể Liên hệ với tôi qua Facebook: https://m.me/he.sanbi/ để hỏi về ứng dụng.
Sau khi sử dụng ứng dụng, nếu gặp vấn đề các bạn có thể đăng bài bên dưới để được giải đáp.
----------------------------------
WeatherXL
Dữ liệu thời tiết trực tuyến từ nguồn freeMeteo và AccuWeather
![]()


bạn ơi, có thể giúp mình lấy dữ liệu thời tiết ở tphcm dc ko ạNó báo "lỗi trong quá trình chạy" anh ạ!
View attachment 258270
Vào lấy bình thường thôi mà!bạn ơi, có thể giúp mình lấy dữ liệu thời tiết ở tphcm dc ko ạ
Ad ơi, sheet accu không có nút chạy.
View attachment 259057

Em chào anh, anh cho em hỏi:*** ỨNG DỤNG ĐÃ NGƯNG PHÁT TRIỂN ***
***Cập nhật mới nhất: 18:40 8/5/2021
+ Nguồn dữ liệu mới từ FreeMeteo.VN
Bài viết này tôi chia sẻ với các bạn ứng dụng Excel sử dụng VBA lấy dữ liệu thời tiết từ nguồn FreeMeteo và AccuWeather rất nhanh.
Giúp ích nhiều cho các bạn viết ứng dụng thi công công trình cần dữ liệu thời tiết.
Ứng dụng sử dụng cơ chế Bất đồng bộ của HTTP nên có thể sẽ không hoạt động trên Window 32 bit. Hoặc máy tính các bạn sử dụng là máy công ty đã bị khóa truy cập.
Một số máy có thể không chạy do cài đặt UseAgent cho HTTP không phù hợp. Vì vậy nên các bạn cần cập nhật biến const UseAgent từ trình duyệt Chrome.
.
Sau khi sử dụng ứng dụng, nếu gặp vấn đề các bạn có thể đăng bài bên dưới để được giải đáp.
----------------------------------
WeatherXL
Dữ liệu thời tiết trực tuyến từ nguồn freeMeteo và AccuWeather
Tôi đã viết code cho ứng dụng lấy dữ liệu thời tiết rất nhanh nhờ vào tool do chính tôi viết ra.
Các bạn muốn học VBA nhanh nhất có thể hãy tham khảo tool hỗ trợ lập trình VBA:
![]()
VBA_FastCode v2.22 - Công cụ học và viết mã VBA một cách nhanh nhất (*27/10/2023)
***** CẬP NHẬT MỚI v2.2 ***** -------------------------------------------------------------------------- Add-in được chia sẻ dưới đây, đó là những gì tôi hiểu biết về VBA và đã viết ra nó. Một Add-in Tools chỉnh sửa code VBA rất đơn giản nhưng có thể giúp các bạn học VBA và viết code nhanh...giaiphapexcel.com
Lâu rồi chắc code đã lỗi thờikính nhờ chủ top hướng dẫn - 0966565658
Anh bớt chút thời gian xem lại đi ạ.Lâu rồi chắc code đã lỗi thời
file này có cập nhật mới chưa bác, hiện tại thấy không sử dụng được nữa, e xem code thì không biết gì hếtLâu rồi chắc code đã lỗi thời
Vẫn chạy bình thường, bạn chỉ cần vào tìm kiếm chọn vùng, sau đó cập nhậtfile này có cập nhật mới chưa bác, hiện tại thấy không sử dụng được nữa, e xem code thì không biết gì hết![]()
Anh @HeSanbi có vẻ thích lập trình hàm nhỉ. Có điều theo ý kiến chủ quan của em, với đại đa số người dùng họ thích click hơn là viết hàm vì phải nhớ cấu trúc hàm...Đã có dự án WeatherXL Add-in
Nếu các bạn trước đây chỉ sử dụng ứng dụng thời tiết mà tôi đã viết. Khá bất tiện trong quá trình sử dụng để ứng dụng cho nhiều trường hợp mà bạn mong muốn, thì nay tôi đã phát triển ứng dụng thành Add-in để sử dụng thuận tiện hơn.
Mục tiêu add-in:
- Thiết lặp nhanh chóng
- Cập nhật thêm dữ liệu nếu dữ liệu chưa có, thay vì phải xóa đi toàn bộ và cập nhật lại từ đầu.
(Ứng dụng được đăng tại mục tài nguyên diễn đàn)
Lỗi treo là do Add-in tự động chạy tìm bản Update mới, lỗi này chỉ xảy ra khi Excel chưa kịp khởi động xongAnh @HeSanbi có vẻ thích lập trình hàm nhỉ. Có điều theo ý kiến chủ quan của em, với đại đa số người dùng họ thích click hơn là viết hàm vì phải nhớ cấu trúc hàm...
-Trải nghiệm đầu tiên là rất hay treo ứng dụng, với lỗi 351.... (không kịp nhìn thì treo máy)
-Phần "Chép mã như dưới đây vào module dự án của bạn, để gán nút cập nhật dữ liệu." em nghĩ anh truyền luôn code vào phím đấy luôn thì hợp lý hơn nếu không thao tác em nghĩ chậm hơn so với mở file excel đã có code thời tiết cũ của anh và sử dụng
-Biết thêm được việc sử dụng hàm để làm vài việc khác ngoài tính toán....
Mình đã đăng ứng dụng tại mục Tài nguyên, bạn có thể tải về sử dụng ngay mà không cần phải chờ đợi.hóng vụ này để ứng dụng vào nhật ký
Xin bác Sanbi hướng dẫn chèn ảnh động vào bài ạ. Em chèn file .gif mà nó toàn đứng yên như .jpg thôi ạ!Nhấn để tải về Add-in WeatherXL
(Để tải tại GiaiPhapExcel cần đăng nhập)
Link tải phụ tại Github:
![]()
-----------------------------------------------
Add-in lấy dữ liệu lịch sử Thời tiết hàng ngày vào bảng tính nhanh chóng
Bài viết này tôi chia sẻ với các bạn ứng dụng Excel sử dụng VBA lấy dữ liệu thời tiết từ nguồn FreeMeteo và TimeAndDate rất nhanh.
Giúp ích nhiều cho các bạn viết ứng dụng thi công công trình cần dữ liệu thời tiết.
----------------------------------
WeatherXL
Dữ liệu thời tiết trực tuyến từ nguồn freeMeteo
HƯỚNG DẪN SỬ DỤNG
Để Add-in lấy được thông tin từ Trang tính để thực hiện cập nhật dữ liệu, cần thực hiện các bước như hướng dẫn dưới đây.Tạo các ô với các Name như sau: (Trong tab Formulas > Name Manager)(Tạo name để tự động lấy thông tin tải và ghi dữ liệu)Các ô bắt buộc:1. Nguồn web: tên tt_Nguon2. Từ ngày: tên tt_TuNgay3. Đến ngày: tên tt_DenNgay(Không cần tạo name tt_TuNgay và tt_DenNgay khi có cột dữ liệu tên tt_TheoNgay)Các ô cột dữ liệu:Đặt ô với Name tên tt_DuLieu đại diện vùng sẽ ghi toàn bộ dữ liệu thông tin thời tiết vào trang tính.Nếu muốn dữ liều các cột riêng lẻ hãy tạo Name như dưới đây:Các Name phải tạo tại tiêu đề cột, Name nào không có thì bỏ qua không ghi dữ liệu.4. Nhiệt độ (nhỏ - lớn): tên tt_NhietDo (giá trị: 24 / 28)5. Nhiệt độ (<) nhỏ nhất: tên tt_NhietDo_Nho6. Nhiệt độ (<) lớn nhất: tên tt_NhietDo_Lon7. Ngày hoặc Theo Ngày: + Nếu tên tt_Ngay_Tang: với cột ngày sắp xếp tăng dần+ Nếu tên tt_Ngay_Giam: với cột ngày sắp xếp giảm dần+ Nếu tên tt_TheoNgay: khi dữ liệu cột ngày đã tồn tại, dữ liệu sẽ ghi vào dòng tương ứng ngày(Không cần tạo name tt_TuNgay và tt_DenNgay)8. Mức gió ổn định tối đa: tên tt_MucGio9. Gió giật tối đa: tên tt_GioGiat10. Lượng mưa: tên tt_LuongMua11. Mô tả: tên tt_MoTa12. Hiện icon: tên tt_icon (Nếu name tồn tại thì Icon sẽ được thêm vào dòng dữ liệu)Để tạo tất cả Name trên nhanh hơn, hãy gõ hàm =ThoiTiet_AddNames() vào ô bất kì, các Name sẽ tự động được tạo và cửa sổ Name Manager sẽ hiện lên để chỉnh sửa.Để tạo trang tính có sẵn, hãy gõ hàm =ThoiTiet_Worksheet() vào ô bất kì,Một trang tính mới sẽ được tạo vào dự án của bạn với giao diện đầy đủ.Tìm vị trí vùng địa lý:Gõ hàm =ThoiTiet_TimKiem("Hà Nội") sẽ tìm kiếm vùng+đường dẫn và ghi vào tại vị trí ô gõ hàm.Bạn cần chép đường dẫn vị trí địa lý cần thiết vào ô Name tt_Nguon.
Gán nút nhấn:
Chép mã dưới đây vào module dự án của bạn, để gán nút cập nhật dữ liệu.Mã sẽ tự động tìm kiếm Add-in và thực thi các lệnh.
JavaScript:Sub GetWeatherVN(Optional Direction&) WeatherXLCall "GetWeatherVN", Direction End Sub Sub ClearWeatherVN(Optional Direction&) WeatherXLCall "ClearWeatherVN", Direction End Sub Sub sortDataMeteoWeather(Optional Direction&) WeatherXLCall "sortDataMeteoWeather", Direction End Sub Sub sortDataTADWeather(Optional Direction&) WeatherXLCall "sortDataTADWeather", Direction End Sub Private Sub WeatherXLCall(Byval proc$, Optional Direction&) On Error Resume Next Dim a For Each a In Application.AddIns If a.Name Like "WeatherXL*" Then Application.OnTime Now, "'" & a.Name & "'!'" & proc & " " & Direction & "'": Exit Sub End If Next MsgBox "Hay cai dat Add-in WeatherXL", vbInformation Err.clear End Sub
Gán tên GetWeatherVN vào nút nhấn cập nhật dữ liệu
Phiên bản cập nhật:
Trình tự động tìm kiếm bản cập nhật mới nhất tại GithubĐể tìm bản cập nhật mới gõ hàm: =ThoiTiet_Update()Để tắt gõ hàm: =ThoiTiet_UpdateOff()Để bật gõ hàm: =ThoiTiet_UpdateOn()
Các bạn có thể tham khảo thêm các bài viết của tôi tại tag #sanbi udf
----------------------------------
Liên hệ hỗ trợ:
Liên hệ Facebook Messenger: Vo Truong Anh Tuan
Liên hệ Zalo: 0384170514
Quét QRCode Zalo:
![]()
-----------------------------------
Các bạn có tham khảo thêm:
+ Ứng dụng lấy mã số thuế:
![]()
TaxCodeTCT v1.17 - Tra cứu thông tin nộp thuế từ Tổng Cục Thuế (**04/01/2024)
Hôm nay tôi chia sẻ cho các bạn ứng dụng hoàn toàn mới, dùng để tra cứu thông tin nộp thuế từ Tổng Cục Thuế. Giúp các bạn thuận tiện trong việc tra cứu thông tin nộp thuế. Nhấn để tải về TaxCode Nguồn tải dự phòng: https://github.com/SanbiVN/TaxCodeVN Hướng dẫn Xem hình ảnh hướng dẫn: 1...www.giaiphapexcel.com
+ Ứng dụng gửi tin nhắn Zalo:
![]()
ZaloExcel v2.97: Gửi tin nhắn, hình ảnh, bảng, biểu đồ, tập tin, tạo nhóm, thu thập tin nhắn
Bài viết không đủ trình độ chia sẻ trợ giúp trên diễn đàn, bài viết đã được xóa.www.giaiphapexcel.com
Các bài viết của tôi tại tag #sanbi udf
Tôi đã viết code cho ứng dụng lấy dữ liệu thời tiết rất nhanh nhờ vào tool do chính tôi viết ra.
Các bạn muốn học VBA nhanh nhất có thể hãy tham khảo tool hỗ trợ lập trình VBA:
![]()
VBA_FastCode v2.22 - Công cụ học và viết mã VBA một cách nhanh nhất (*27/10/2023)
***** CẬP NHẬT MỚI v2.2 ***** -------------------------------------------------------------------------- Add-in được chia sẻ dưới đây, đó là những gì tôi hiểu biết về VBA và đã viết ra nó. Một Add-in Tools chỉnh sửa code VBA rất đơn giản nhưng có thể giúp các bạn học VBA và viết code nhanh...giaiphapexcel.com
Xin bác Sanbi hướng dẫn chèn ảnh động vào bài ạ. Em chèn file .gif mà nó toàn đứng yên như .jpg thôi ạ!Nhấn để tải về Add-in WeatherXL
(Để tải tại GiaiPhapExcel cần đăng nhập)
Link tải phụ tại Github:
![]()
-----------------------------------------------
Add-in lấy dữ liệu lịch sử Thời tiết hàng ngày vào bảng tính nhanh chóng
Bài viết này tôi chia sẻ với các bạn ứng dụng Excel sử dụng VBA lấy dữ liệu thời tiết từ nguồn FreeMeteo và TimeAndDate rất nhanh.
Giúp ích nhiều cho các bạn viết ứng dụng thi công công trình cần dữ liệu thời tiết.
----------------------------------
WeatherXL
Dữ liệu thời tiết trực tuyến từ nguồn freeMeteo
HƯỚNG DẪN SỬ DỤNG
Để Add-in lấy được thông tin từ Trang tính để thực hiện cập nhật dữ liệu, cần thực hiện các bước như hướng dẫn dưới đây.Tạo các ô với các Name như sau: (Trong tab Formulas > Name Manager)(Tạo name để tự động lấy thông tin tải và ghi dữ liệu)Các ô bắt buộc:1. Nguồn web: tên tt_Nguon2. Từ ngày: tên tt_TuNgay3. Đến ngày: tên tt_DenNgay(Không cần tạo name tt_TuNgay và tt_DenNgay khi có cột dữ liệu tên tt_TheoNgay)Các ô cột dữ liệu:Đặt ô với Name tên tt_DuLieu đại diện vùng sẽ ghi toàn bộ dữ liệu thông tin thời tiết vào trang tính.Nếu muốn dữ liều các cột riêng lẻ hãy tạo Name như dưới đây:Các Name phải tạo tại tiêu đề cột, Name nào không có thì bỏ qua không ghi dữ liệu.4. Nhiệt độ (nhỏ - lớn): tên tt_NhietDo (giá trị: 24 / 28)5. Nhiệt độ (<) nhỏ nhất: tên tt_NhietDo_Nho6. Nhiệt độ (<) lớn nhất: tên tt_NhietDo_Lon7. Ngày hoặc Theo Ngày: + Nếu tên tt_Ngay_Tang: với cột ngày sắp xếp tăng dần+ Nếu tên tt_Ngay_Giam: với cột ngày sắp xếp giảm dần+ Nếu tên tt_TheoNgay: khi dữ liệu cột ngày đã tồn tại, dữ liệu sẽ ghi vào dòng tương ứng ngày(Không cần tạo name tt_TuNgay và tt_DenNgay)8. Mức gió ổn định tối đa: tên tt_MucGio9. Gió giật tối đa: tên tt_GioGiat10. Lượng mưa: tên tt_LuongMua11. Mô tả: tên tt_MoTa12. Hiện icon: tên tt_icon (Nếu name tồn tại thì Icon sẽ được thêm vào dòng dữ liệu)Để tạo tất cả Name trên nhanh hơn, hãy gõ hàm =ThoiTiet_AddNames() vào ô bất kì, các Name sẽ tự động được tạo và cửa sổ Name Manager sẽ hiện lên để chỉnh sửa.Để tạo trang tính có sẵn, hãy gõ hàm =ThoiTiet_Worksheet() vào ô bất kì,Một trang tính mới sẽ được tạo vào dự án của bạn với giao diện đầy đủ.Tìm vị trí vùng địa lý:Gõ hàm =ThoiTiet_TimKiem("Hà Nội") sẽ tìm kiếm vùng+đường dẫn và ghi vào tại vị trí ô gõ hàm.Bạn cần chép đường dẫn vị trí địa lý cần thiết vào ô Name tt_Nguon.
Gán nút nhấn:
Chép mã dưới đây vào module dự án của bạn, để gán nút cập nhật dữ liệu.Mã sẽ tự động tìm kiếm Add-in và thực thi các lệnh.
JavaScript:Sub GetWeatherVN(Optional Direction&) WeatherXLCall "GetWeatherVN", Direction End Sub Sub ClearWeatherVN(Optional Direction&) WeatherXLCall "ClearWeatherVN", Direction End Sub Sub sortDataMeteoWeather(Optional Direction&) WeatherXLCall "sortDataMeteoWeather", Direction End Sub Sub sortDataTADWeather(Optional Direction&) WeatherXLCall "sortDataTADWeather", Direction End Sub Private Sub WeatherXLCall(Byval proc$, Optional Direction&) On Error Resume Next Dim a For Each a In Application.AddIns If a.Name Like "WeatherXL*" Then Application.OnTime Now, "'" & a.Name & "'!'" & proc & " " & Direction & "'": Exit Sub End If Next MsgBox "Hay cai dat Add-in WeatherXL", vbInformation Err.clear End Sub
Gán tên GetWeatherVN vào nút nhấn cập nhật dữ liệu
Phiên bản cập nhật:
Trình tự động tìm kiếm bản cập nhật mới nhất tại GithubĐể tìm bản cập nhật mới gõ hàm: =ThoiTiet_Update()Để tắt gõ hàm: =ThoiTiet_UpdateOff()Để bật gõ hàm: =ThoiTiet_UpdateOn()
Các bạn có thể tham khảo thêm các bài viết của tôi tại tag #sanbi udf
----------------------------------
Liên hệ hỗ trợ:
Liên hệ Facebook Messenger: Vo Truong Anh Tuan
Liên hệ Zalo: 0384170514
Quét QRCode Zalo:
![]()
-----------------------------------
Các bạn có tham khảo thêm:
+ Ứng dụng lấy mã số thuế:
![]()
TaxCodeTCT v1.17 - Tra cứu thông tin nộp thuế từ Tổng Cục Thuế (**04/01/2024)
Hôm nay tôi chia sẻ cho các bạn ứng dụng hoàn toàn mới, dùng để tra cứu thông tin nộp thuế từ Tổng Cục Thuế. Giúp các bạn thuận tiện trong việc tra cứu thông tin nộp thuế. Nhấn để tải về TaxCode Nguồn tải dự phòng: https://github.com/SanbiVN/TaxCodeVN Hướng dẫn Xem hình ảnh hướng dẫn: 1...www.giaiphapexcel.com
+ Ứng dụng gửi tin nhắn Zalo:
![]()
ZaloExcel v2.97: Gửi tin nhắn, hình ảnh, bảng, biểu đồ, tập tin, tạo nhóm, thu thập tin nhắn
Bài viết không đủ trình độ chia sẻ trợ giúp trên diễn đàn, bài viết đã được xóa.www.giaiphapexcel.com
Các bài viết của tôi tại tag #sanbi udf
Tôi đã viết code cho ứng dụng lấy dữ liệu thời tiết rất nhanh nhờ vào tool do chính tôi viết ra.
Các bạn muốn học VBA nhanh nhất có thể hãy tham khảo tool hỗ trợ lập trình VBA:
![]()
VBA_FastCode v2.22 - Công cụ học và viết mã VBA một cách nhanh nhất (*27/10/2023)
***** CẬP NHẬT MỚI v2.2 ***** -------------------------------------------------------------------------- Add-in được chia sẻ dưới đây, đó là những gì tôi hiểu biết về VBA và đã viết ra nó. Một Add-in Tools chỉnh sửa code VBA rất đơn giản nhưng có thể giúp các bạn học VBA và viết code nhanh...giaiphapexcel.com
Cảm ơn bác nhiều!@hoangtuan.net Gif này được lưu trữ tại server Github bạn nhé, tệp gif chỉ cần có nơi lưu trữ và có thể truy cập là được.
Github là sở hữu của Microsoft. Là kho lưu trữ cho dân lập trình.
Em chạy cập nhập thấy thông báo như hình dưới là do đâu vậy anh?Add-in lấy dữ liệu lịch sử Thời tiết hàng ngày vào bảng tính nhanh chóng
Bài viết này tôi chia sẻ với các bạn ứng dụng Excel sử dụng VBA lấy dữ liệu thời tiết từ nguồn FreeMeteo và TimeAndDate rất nhanh.
Giúp ích nhiều cho các bạn viết ứng dụng thi công công trình cần dữ liệu thời tiết.
----------------------------------
WeatherXL
Dữ liệu thời tiết trực tuyến từ nguồn freeMeteo
HƯỚNG DẪN SỬ DỤNG
Để Add-in lấy được thông tin từ Trang tính để thực hiện cập nhật dữ liệu, cần thực hiện các bước như hướng dẫn dưới đây.Tạo các ô với các Name như sau: (Trong tab Formulas > Name Manager)(Tạo name để tự động lấy thông tin tải và ghi dữ liệu)Các ô bắt buộc:1. Nguồn web: tên tt_Nguon2. Từ ngày: tên tt_TuNgay3. Đến ngày: tên tt_DenNgay(Không cần tạo name tt_TuNgay và tt_DenNgay khi có cột dữ liệu tên tt_TheoNgay)Các ô cột dữ liệu:Đặt ô với Name tên tt_DuLieu đại diện vùng sẽ ghi toàn bộ dữ liệu thông tin thời tiết vào trang tính.Nếu muốn dữ liều các cột riêng lẻ hãy tạo Name như dưới đây:Các Name phải tạo tại tiêu đề cột, Name nào không có thì bỏ qua không ghi dữ liệu.4. Nhiệt độ (nhỏ - lớn): tên tt_NhietDo (giá trị: 24 / 28)5. Nhiệt độ (<) nhỏ nhất: tên tt_NhietDo_Nho6. Nhiệt độ (<) lớn nhất: tên tt_NhietDo_Lon7. Ngày hoặc Theo Ngày: + Nếu tên tt_Ngay_Tang: với cột ngày sắp xếp tăng dần+ Nếu tên tt_Ngay_Giam: với cột ngày sắp xếp giảm dần+ Nếu tên tt_TheoNgay: khi dữ liệu cột ngày đã tồn tại, dữ liệu sẽ ghi vào dòng tương ứng ngày(Không cần tạo name tt_TuNgay và tt_DenNgay)8. Mức gió ổn định tối đa: tên tt_MucGio9. Gió giật tối đa: tên tt_GioGiat10. Lượng mưa: tên tt_LuongMua11. Mô tả: tên tt_MoTa12. Hiện icon: tên tt_icon (Nếu name tồn tại thì Icon sẽ được thêm vào dòng dữ liệu)Để tạo tất cả Name trên nhanh hơn, hãy gõ hàm =ThoiTiet_AddNames() vào ô bất kì, các Name sẽ tự động được tạo và cửa sổ Name Manager sẽ hiện lên để chỉnh sửa.Để tạo trang tính có sẵn, hãy gõ hàm =ThoiTiet_Worksheet() vào ô bất kì,Một trang tính mới sẽ được tạo vào dự án của bạn với giao diện đầy đủ.Tìm vị trí vùng địa lý:Gõ hàm =ThoiTiet_TimKiem("Hà Nội") sẽ tìm kiếm vùng+đường dẫn và ghi vào tại vị trí ô gõ hàm.Bạn cần chép đường dẫn vị trí địa lý cần thiết vào ô Name tt_Nguon.
Gán nút nhấn:
Chép mã dưới đây vào module dự án của bạn, để gán nút cập nhật dữ liệu.Mã sẽ tự động tìm kiếm Add-in và thực thi các lệnh.
JavaScript:Sub GetWeatherVN(Optional Direction&) WeatherXLCall "GetWeatherVN", Direction End Sub Sub ClearWeatherVN(Optional Direction&) WeatherXLCall "ClearWeatherVN", Direction End Sub Sub sortDataMeteoWeather(Optional Direction&) WeatherXLCall "sortDataMeteoWeather", Direction End Sub Sub sortDataTADWeather(Optional Direction&) WeatherXLCall "sortDataTADWeather", Direction End Sub Private Sub WeatherXLCall(Byval proc$, Optional Direction&) On Error Resume Next Dim a For Each a In Application.AddIns If a.Name Like "WeatherXL*" Then Application.OnTime Now, "'" & a.Name & "'!'" & proc & " " & Direction & "'": Exit Sub End If Next MsgBox "Hay cai dat Add-in WeatherXL", vbInformation Err.clear End Sub
Gán tên GetWeatherVN vào nút nhấn cập nhật dữ liệu
Phiên bản cập nhật:
Trình tự động tìm kiếm bản cập nhật mới nhất tại GithubĐể tìm bản cập nhật mới gõ hàm: =ThoiTiet_Update()Để tắt gõ hàm: =ThoiTiet_UpdateOff()Để bật gõ hàm: =ThoiTiet_UpdateOn()
Các bạn có thể tham khảo thêm các bài viết của tôi tại tag #sanbi udf
----------------------------------
Liên hệ hỗ trợ:
Liên hệ Facebook Messenger: Vo Truong Anh Tuan
Liên hệ Zalo: 0384170514
Quét QRCode Zalo:
![]()
-----------------------------------
Các bạn có tham khảo thêm:
+ Ứng dụng lấy mã số thuế:
![]()
TaxCode - Tra cứu thông tin người nộp thuế từ tổng cục thuế cho Excel
Phiên bản mới nhất đã được chia sẻ tại bài viết https://www.giaiphapexcel.com/diendan/threads/174120/ ---------------------------------------------------------------------------------------------------- Hôm nay tôi chia sẻ cho các bạn ứng dụng...giaiphapexcel.com
+ Ứng dụng gửi tin nhắn Zalo:
![]()
ZaloExcel v2.97: Gửi tin nhắn, hình ảnh, bảng, biểu đồ, tập tin, tạo nhóm, thu thập tin nhắn
Bài viết không đủ trình độ chia sẻ trợ giúp trên diễn đàn, bài viết đã được xóa.www.giaiphapexcel.com
Các bài viết của tôi tại tag #sanbi udf
Tôi đã viết code cho ứng dụng lấy dữ liệu thời tiết rất nhanh nhờ vào tool do chính tôi viết ra.
Các bạn muốn học VBA nhanh nhất có thể hãy tham khảo tool hỗ trợ lập trình VBA:
![]()
VBA_FastCode v2.22 - Công cụ học và viết mã VBA một cách nhanh nhất (*27/10/2023)
***** CẬP NHẬT MỚI v2.2 ***** -------------------------------------------------------------------------- Add-in được chia sẻ dưới đây, đó là những gì tôi hiểu biết về VBA và đã viết ra nó. Một Add-in Tools chỉnh sửa code VBA rất đơn giản nhưng có thể giúp các bạn học VBA và viết code nhanh...giaiphapexcel.com
(Để tải tại GiaiPhapExcel cần đăng nhập)

Bạn chưa chép mã vào VBA
Dạ! em cảm ơn anh!Bạn chưa chép mã vào VBA
Tuyệt vời ! Hoan hôPhiên bản mới dự kiến đang phát triển cho việc tải dữ liệu thời tiết cả dự báo và lịch sử tốt hơn
![]()
![]()