Gán giá trị cho 1 cell

[hovafa]

Chào các ACE. Em muốn gán 1 ô cho 1 chuỗi có sẵn nhưng sao không được báo lỗi hoài.

Em làm như vầy nè nhưng không được.

Vào vba viết code như sau:

sub test()
sheet1.range("A1").text = "hello"
end sub

nhưng khi vào excel vào ô bất kỳ go =test() thì ô A1 không hiện gì cả và tại ô bất kỳ mớ gõ =test() báo lỗi...hic...

Em mới học không biết phải làm sao mong các bạn chỉ giúp với.

View more random threads:

• Gộp và tách dữ liệu thành nhiều sheet
• Giúp tối ưu Marco trong Excel
• Theo dõi sinh viên
• Cho e hỏi bài này với
• Hỏi về tìm kiếm dữ liệu từ nhiều Sheet và hiển thị kết quả trên form
• Bạn nào giúp mình code cái này với
• Mẫu theo dõi Hợp đồng bằng excell
• Học vba cho dân kế toán
• Rút trích dữ liệu theo điều kiện !!
• Cần giúp đỡ làm 1 chương trình nhỏ (cảm ơn & hậu tạ)

[thangmarketing]

Ðề: Gán giá trị cho 1 cell

Em muốn gán 1 ô cho 1 chuỗi có sẵn nhưng sao không được báo lỗi hoài.

Em làm như vầy nè nhưng không được.

Vào vba viết code như sau:

sub test()
sheet1.range("A1").text = "hello"
end sub
(1) Nhưng khi vào excel vào ô bất kỳ go =test() thì ô A1 không hiện gì cả
& (2) tại ô bất kỳ mớ gõ =test() báo lỗi...hic...

(1) Bạn sửa dòng lệnh đó lại như sau, chắc OK:

 Sheet1.range("A1").Value = "hello"

(2) Bạn fải viết dưới dạng hàm tự tạo thì mới được, như

Function Test() As String
   Test="Hello & . . ."
End Function

[danlongthanh]

Ðề: Gán giá trị cho 1 cell

1. Để gõ lệnh = test() thì em phải viết test dưới dạng hàm (Funtion) chứ không phải Sub

2. Câu lệnh gán của em cần sửa lại như sau:
Sheet1.Range("A1") = "hello"

3. Nếu em thực hiện gán giá trị cho 1 ô bằng cách này thì excel sẽ không thực hiện được. Em nên chọn cách thực hiện lệnh gán từ sự kiện khác. VD tạo nút lệnh để thực hiện thủ tục test của em