Kiểm tra dùm em làm sai code chỗ nào? (2 người xem)

  • Thread starter Thread starter mondays
  • Ngày gửi Ngày gửi
Liên hệ QC

Người dùng đang xem chủ đề này

mondays

Thành viên mới
Tham gia
26/10/12
Bài viết
28
Được thích
3
Em đang bắt đầu tự học VBA
Em có bài tập như thế này:
Ghép mỗi giá trị ký tự và số trong các ô cho sẵn lại với nhau và trả kết quả về ô có địa chỉ tương ứng với giá trị của nó. Ví dụ: giá trị "B3" sẽ hiện trong ô B3.
Em đã nhập code như thế này nhưng nó báo lỗi
Mã:
Sub ak()
Dim i As Byte
Dim j As Byte
For i = 1 To 4 Step 1
a = Cells(11, i + 1).Value
For j = 1 To 4 Step 1
b = Cells(12, j + 1).Value
kq = a & b
cell(j, i).Value = kq
Next j
Next i
End Sub
Các cao thủ xin giúp em tại sao nó lại bị lỗi vậy? (em có đính kèm file, code nằm trong module 2)
 

File đính kèm

Bạn sai ở đoạn này, màu đỏ chuyển thành cells(j, i).Value = kq
Mã:
Sub ak()
Dim i As Byte
Dim j As Byte
For i = 1 To 4 Step 1
a = Cells(11, i + 1).Value
For j = 1 To 4 Step 1
b = Cells(12, j + 1).Value
kq = a & b
[COLOR=#ff0000][B]cell(j, i).Value = kq
[/B][/COLOR]Next j
Next i
End Sub
 
Lần chỉnh sửa cuối:
Upvote 0
Cám ơn bạn nhiều!! Nhân tiện bạn nào có bài tập VBA cơ bản không? Share cho mình làm với!!!
 
Upvote 0
Cám ơn bạn nhiều!! Nhân tiện bạn nào có bài tập VBA cơ bản không? Share cho mình làm với!!!
Trên diễn đàn có rất nhiều bài VBA, bạn có thể tìm kiếm
Và đây là lớp học VBA Online GPE do thầy Sa chủ nhiệm
http://www.giaiphapexcel.com/forum/...VBA-đơn-giản-dành-cho-những-người-mới-bắt-đầu
Bạn có thể tìm hiểu và tham gia lớp học (các thầy rất tâm huyết đấy bạn)
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom