Kết quả tìm kiếm

Xin đa tạ 2 cao thủ :D

Hiện tại em đang cần tạo 1 hàm trả về các hạng tử tham gia vào 1 biểu thức tính toán. Ví dụ: hàm tên là lay_hang_tu, tham số đầu vào là 1 chuỗi ký tự thì lay_hang_tu("CRS_CDS_VN*2+BOND_DISC_ZC*0.8+CRS_BANK_AA") sẽ trả về 1 mảng (Array) gồm 3 chuỗi ký tự...

Em cảm ơn thầy ndu nhiều :) Đúng là câu trả lời cho vấn đề của em

Cho em hỏi rằng khi em muốn chuyển từ early binding sang Late Binding thì làm thế nào để tìm được tên Class để đẩy vào hàm CreateObject? Ví dụ em muốn chuyển Dim objHTTP As New WinHttp.WinHttpRequest thành Dim objHTTP As ObjectSet objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1") Thì làm...

Yêu cầu của bạn chắc phải sử dụng 1 hàm tự tạo bằng VBA. Vậy có được ko?

Tại ô J13 của sheet WH sử dụng công thức này, sau đó kéo sang phải và kéo xuống. =IF(UPPER(LEFT(INDEX(Location!$B$2:$B$712,MATCH(WH!$D13,Location!$A$2:$A$712,0)),1))=UPPER(J$12),INDEX(Location!$B$2:$B$712,MATCH(WH!$D13,Location!$A$2:$A$712,0)),"") Lưu ý: - Công thức không phân biệt chữ hoa...

Mình đang muốn mua 1 CPU để chơi dota 2, tầm từ 6 triệu đến 8 triệu. Ko bao gồm DVD, hạn chế chi phí liên quan đến đồ họa, card màn hình. Bạn tư vấn cho mình với

Em làm được rồi ạ, thanks bác nhiều, hóa ra chỉ đơn giản là Vào View rồi chọn Unhide Workbook thôi Ko cần code gì cả ạ, tự mình làm phức tạp vấn đề :))) nếu dùng code thì lệnh này ạ Windows("Some Workbook.xlsm").Visible =True

Vấn đề là em xem thuộc tính của các Sheets trong VBA properties thì nó vẫn là xlSheetsVisible @@

Em chạy cái sub này Sub WorksheetLoop2() Dim Sh As Worksheet For Each Sh In Application.ActiveWorkbook.Sheets Sh.Visible = True Next End Sub Thì nó báo lỗi Object variable or With block variable not set tại dòng For Each Sh In Application.ActiveWorkbook.Sheets

Hum nọ em có nghịch ngợm vào cái lệnh ActiveWindow.Visible = False Sau đó tất cả các worksheet đều biến mất, e loay hoay mãi mà ko làm mấy Worksheet hiện lên như cũ được, các cao thủ vào giúp em với **~****~**

Em có mò được bài báo sau hướng dẫn cách Undo cho code VBA: http://www.jkp-ads.com/Articles/UndoWithVBA00.asp Tông quan thì cách làm là tạo 2 classes (Code cho Class đã có trên link trên) sau đó trong mỗi sub thì sẽ theo cấu trúc như sau: Option Explicit Dim mUndoClass As clsExecAndUndo sub...

Em vào bằng Chrome vẫn bị cảnh báo, vào xong thì icon vẫn là chữ V -+*/!$@!!!$@!!

Bạn phải tạo sub với tham số control as Iribboncontrol để gán vào cái menu đó thì khi bấm vào menu nó sẽ chạy sub đó --=0

Thủ thuật quá hay! @$@!^%@$@!^%

Anh thử demo 1 đoạn code nhỏ cho em xem với --=0

Em có 1 mảng 2 chiều tên là resultArr. CHo em hỏi là làm sao để hiển thị nó ra như 1 bảng dữ liệu cho người dùng xem mà ko cần gán dữ liệu của mảng vào các ô trong Excel +-+-+-+

1 cách làm khác --=0

Bạn Copy code này vào rồi chạy nhé Sub chuyen_data() Dim dimen1 As Long, lrow As Long, i As Integer, k As Integer Dim str_arr As Variant Sheets("BANG1. NKQ 0523").Activate lrow = Cells(Rows.Count, 3).End(xlUp).Row - 5 dimen1 =...

Bác Le_vis share cho em cái pass để em vào tham khảo code của bác nhé. Cảm ơn bác nhìu ;;;;;;;;;;;;;;;;;;;;;;