Hỏi tạo hàm VBA nối chuỗi và in đậm (1 người xem)

[minhxaydungvinh]

Mình tạo 1 hàm NoichuoiInDam để nối 2 chuỗi bất kỳ và in đậm chuỗi đầu tiên. Như trong ví dụ là nối 2 chuỗi ở 2 ô A1 và A2, kết quả giống ô A3. Nhưng không biết sai chỗ nào mà cứ lỗi #Value. Nhờ mọi người sửa giúp mình với

Public Function NoiChuoiInDam(i As String, j As String) As String
Range("a10").Value = i & " " & j
Xlen = Len(i)
Range("a10").Characters(Start:=1, Length:=Xlen).Font.FontStyle = "Bold"
NoiChuoiInDam = Range("a10").Value
End Function

 

[befaint]

Mình tạo 1 hàm NoichuoiInDam để nối 2 chuỗi bất kỳ và in đậm chuỗi đầu tiên. Như trong ví dụ là nối 2 chuỗi ở 2 ô A1 và A2, kết quả giống ô A3. Nhưng không biết sai chỗ nào mà cứ lỗi #Value. Nhờ mọi người sửa giúp mình với

Public Function NoiChuoiInDam(i As String, j As String) As String
Range("a10").Value = i & " " & j
Xlen = Len(i)
Range("a10").Characters(Start:=1, Length:=Xlen).Font.FontStyle = "Bold"
NoiChuoiInDam = Range("a10").Value
End Function

Mới cách đây 14 ngày keo là chưa rõ VBA, mà hôm nay viết hẳn Function rồi.
Mình tìm hiểu từ từ thôi, nạp sao kịp.
Hàm chỉ định range thì sao được? không can thiệp vào thuộc tính của đối tượng.

 

[minhxaydungvinh]

Mới cách đây 14 ngày keo là chưa rõ VBA, mà hôm nay viết hẳn Function rồi.
Mình tìm hiểu từ từ thôi, nạp sao kịp.
Hàm chỉ định range thì sao được? không can thiệp vào thuộc tính của đối tượng.

Chưa rõ nên mới không biết nó sai chỗ nào mà. Nhờ bạn giúp mình cách sửa được không