Giúp về lỗi un-Time Error 1004: Unable to open từ visuab basic (1 người xem)

[sonquengo]

em có cái phần mềm xổ số để tham khảo nhưng dạo này webiste n

 

[giaiphap]

em có cái phần mềm xổ số để tham khảo nhưng dạo này webiste nó bị lỗi hay sao ý mà giở ra báo lỗi như vậy em nghĩ do cái webiste kia thôi bác nào biết sửa cho em anh em đàm đạo với nhau nhé .ĐƯợc thì gửi lại cho em vào gmail troikhuyaqua@gmail.com lỗi này cũng cơ bản nhưng em chả đc học nên chịu đây phần mềm đây http://www.mediafire.com/download/fh2xt29p4d7yk1v/LoRaTheoGiai+-+Full.xlsm

Bác này hay nhỉ chả được học mà vẫn biết đây là lỗi cơ bản.

 

[Mutants Men]

Bác này hay nhỉ chả được học mà vẫn biết đây là lỗi cơ bản.

thì lỗi nào chả là cơ bản thầy

em có cái phần mềm xổ số để tham khảo nhưng dạo này webiste nó bị lỗi hay sao ý mà giở ra báo lỗi như vậy em nghĩ do cái webiste kia thôi bác nào biết sửa cho em anh em đàm đạo với nhau nhé .ĐƯợc thì gửi lại cho em vào gmail troikhuyaqua@gmail.com lỗi này cũng cơ bản nhưng em chả đc học nên chịu đây phần mềm đâyhttp://www.mediafire.com/download/fh2xt29p4d7yk1v/LoRaTheoGiai+-+Full.xlsm

tui thì không biết là trang web đó thế nào. trong code bạn có cung cấp cho 1 địa chỉ web để nó thực thi lệnh. liệu cái nội dung trang web đó có tồn tại để truy cập không.
lần sau bạn gửi file đừng có đặt pass. mất công làm chuyện ruồi bu lắm.

 

[be_09]

lỗi này cũng cơ bản

Xem code coi có cơ bản không? Nếu lỗi cơ bản thì Lỗi cơ bản thì xem cod rồi tự sửa đi nhé (tôi không thích ba cái vụ xổ số).

Sub AutoCapNhatKQ()
Dim nName As Name, i As Long
For Each nName In Names
If InStr(1, nName.RefersTo, "#REF!") > 0 Then
nName.Delete
End If
Next
For i = 1 To CAPNHAT.[B4]
If CAPNHAT.[B4] = 0 Then
Exit Sub
End If
CAPNHAT.Rows("20:50").Delete   
 With CAPNHAT.QueryTables.Add(Connection:= _ 
"URL;http://ketqua.vn/xo-so-truyen-thong.php?ngay=" & CAPNHAT.[B5], Destination:= _
CAPNHAT.Range("$A$20"))        
.Name = "2012_1"        
.FieldNames = True        
.RowNumbers = False        
.FillAdjacentFormulas = False        
.PreserveFormatting = True        
.RefreshOnFileOpen = False        
.BackgroundQuery = True        
.RefreshStyle = xlInsertDeleteCells        
.SavePassword = False        
.SaveData = True        
.AdjustColumnWidth = True        
.RefreshPeriod = 0        
.WebSelectionType = xlSpecifiedTables        
.WebFormatting = xlWebFormattingNone        
.WebTables = "3"        
.WebPreFormattedTextToColumns = True        
.WebConsecutiveDelimitersAsOne = True        
.WebSingleBlockTextImport = False        
.WebDisableDateRecognition = False        
.WebDisableRedirections = False        
.Refresh BackgroundQuery:=False    
End With    
With [SoLieu!a65500].End(xlUp).Offset(1)        
.NumberFormat = "dd/mm/yyyy"        
.Resize(9, 7).Value = CAPNHAT.[j6].Resize(9, 7).Value    
End With
KQCN.Range("J1") = KQCN.Range("J1") + 1
If Weekday(KQCN.Range("A" & KQCN.Range("A10000").End(xlUp).Row - 8)) = 1 Then
KQCN.Range("B" & KQCN.Range("A10000").End(xlUp).Row - 8) = "CN"
Else
KQCN.Range("B" & KQCN.Range("A10000").End(xlUp).Row - 8) = "T" & Weekday(KQCN.Range("A" & KQCN.Range("A10000").End(xlUp).Row - 8))
End If
Next i
CAPNHAT.Rows("20:50").Delete
KQCN.UsedRange.Columns.AutoFit
KQCN.UsedRange.Rows.AutoFit
KQCN.Range("J1") = "=H1+1"
End Sub

 

[sonquengo]

lỗi link có bác nào sửa cho em ko

 

[sonquengo]

Giúp về lỗi un-Time Error 1004: Unable to open từ visuab basic htttp

em có cái phần mềm xổ số để tham khảo nhưng dạo nà

 

[sonquengo]

em có cái phần mềm xổ số để tham khảo nhưng dạo này webiste nó bị lỗi hay sao ý mà giở ra báo lỗi như vậy em nghĩ do cái webiste kia thôi bác nào biết sửa cho em anh em đàm đạo vớFull.xlsm

 

[sonquengo]

có ai sửa lại code ngày giúp em với sai chỗ 4/4/2015 đổi lại là 4-4-2015 là chạy lại đc mà em chả biết gì về code hicc

 

[doveandrose]

em có cái file nó bị lỗi cập nhật kết quả xổ số bác biết sửa giúp em đc thì em chỉ bác vài đường mình chơi chung luôn hì http://www.mediafire.com/download/l6cn2qag0k7jkpa/LoRaTheoGiai-Full.xlsm

ờ cảm ơn bạn có ý tốt muốn giúp mình làm tỉ phú . Nhưng thật tiếc mình không có hứng thú kiếm tiền trên trời rơi xuống , nên chắc bạn cần gửi thư cho thành viên khác nhé , đừng mất công chờ mình .

 

[ducmxd]

Bạn có cần nữa không? Liên hệ với mình qua mail