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:

• Hỗ trợ code tạo mục lục.
• Tính lãi suất trả góp , tiền trả hàng tháng và số tháng trả dao động
• Lỗi khi sử dụng macro,addin
• (Đưa bài dùm 1 bạn): Làm sao khi mở file (hay trang tính nào đó của file) là hàm dưới đây chạy ngay
• Xin mẫu Báo cáo tài chính - Nhật ký chung
• Giúp tối ưu Marco trong Excel
• Tạo hàm trong file excel theo dõi hàng tồn kho!!!
• Cần hỗ trợ code VBA
• đăng ký học vba excel tại hà nội
• làm dự toán

[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