Làm cách nào để định dạng và trộn ô như file đính kèm?

[vanle33]

Tôi có một số vấn đề như đã nêu trong file đính kèm.
Mong mọi người cho tôi cách giải quyết.
Thanks

 

[vanle33]

Các bạn cho mình biết cách xử lý vấn đề trên với nhé!

Các cao thủ lập trình cho em ý kiến về vấn đề bài 1 với a.

 

[Ba Tê]

Các bạn cho mình biết cách xử lý vấn đề trên với nhé!

Câu hỏi của bạn chưa rõ ràng, chưa thấy kết quả mẫu của bạn.
1. Trộn là sao? Nối chuỗi trong các ô đó lại, hay là muốn Trộn "lộn xà ngầu".
2. Dữ liệu trong 1 ô thì có thể co giãn trong ô đó, bạn muốn tràn sang ô khác là sao? lỡ trong các ô kề bên cũng có dữ liệu thì sao?

 

[vanle33]

Câu hỏi của bạn chưa rõ ràng, chưa thấy kết quả mẫu của bạn.
1. Trộn là sao? Nối chuỗi trong các ô đó lại, hay là muốn Trộn "lộn xà ngầu".
2. Dữ liệu trong 1 ô thì có thể co giãn trong ô đó, bạn muốn tràn sang ô khác là sao? lỡ trong các ô kề bên cũng có dữ liệu thì sao?

1) Em nói trộn vào nhau nghĩa là khi em đang có dữ liệu tại các ô từ A1 đến A5 bây giờ em muốn nhấn 1 cái nút "XYZ" để ra kết quả tại ô C1 (có thể đặt kết quả sang vị trí khác) là dữ liệu từ A1 đến A5 , tương tự như khi em ấn Alt+Enter để xuống dòng trong cùng 1 ô đó bác. Cái nút "XYZ" có thể lập bằng công thức hay Code cũng được
2) Ý em muốn là khi em đánh chữ vào ô (A1 chẳng hạn) thì dữ liệu tự giãn ra cả theo chiều đứng và chiều ngang của 1 ô đó bác. Tức là khi chiều rộng của cột nhỏ mà ô đó có nhiều chữ thì cả hàng chứa chữ đó tự giãn xuống theo chiều ngang, và khi chiều rộng của hàng nhỏ mà ô đó có nhiều chữ thì cả cột chứa chữ đó tự giãn sang phải theo chiều đứng.

 

[Ba Tê]

1) Em nói trộn vào nhau nghĩa là khi em đang có dữ liệu tại các ô từ A1 đến A5 bây giờ em muốn nhấn 1 cái nút "XYZ" để ra kết quả tại ô C1 (có thể đặt kết quả sang vị trí khác) là dữ liệu từ A1 đến A5 , tương tự như khi em ấn Alt+Enter để xuống dòng trong cùng 1 ô đó bác. Cái nút "XYZ" có thể lập bằng công thức hay Code cũng được
2) Ý em muốn là khi em đánh chữ vào ô (A1 chẳng hạn) thì dữ liệu tự giãn ra cả theo chiều đứng và chiều ngang của 1 ô đó bác. Tức là khi chiều rộng của cột nhỏ mà ô đó có nhiều chữ thì cả hàng chứa chữ đó tự giãn xuống theo chiều ngang, và khi chiều rộng của hàng nhỏ mà ô đó có nhiều chữ thì cả cột chứa chữ đó tự giãn sang phải theo chiều đứng.

1) Không hiểu ý muốn này để làm gì. Nếu muốn sử dụng linh hoạt cho nhiều vị trí thì nên tạo Function, sao lại là nút XYZ?
Chỉ lấy dữ liệu của 5 dòng A1:A5 vào 1 ô duy nhất.
2) Chuyện này format cell kiểu Wrap Text là được mà, không lẻ bạn không biết cách làm?
Trong file làm theo yêu cầu bấm nút XYZ của bạn.

 

[vanle33]

1) Không hiểu ý muốn này để làm gì. Nếu muốn sử dụng linh hoạt cho nhiều vị trí thì nên tạo Function, sao lại là nút XYZ?
Chỉ lấy dữ liệu của 5 dòng A1:A5 vào 1 ô duy nhất.
2) Chuyện này format cell kiểu Wrap Text là được mà, không lẻ bạn không biết cách làm?
Trong file làm theo yêu cầu bấm nút XYZ của bạn.

Vấn đề 1) Em thấy nối các chuỗi từ A1 đến A5 vào 1 ô là OK rồi. Nhưng bác có thể chỉnh code cho em để
+) Khi em muốn chọn vùng dữ liệu nào thì em sẽ quét chọn vùng dữ liệu đó và nhấn nút "XYZ" thì sẽ ra kết quả.
+) Em muốn hiện ra 1 bảng thông báo để mình chọn ô hiện kết quả mà không phải lúc nào cũng hiện kết quả ở I1
Vấn đề 2) Nếu dùng Wrap text thì cứ phải nháy kép vào giữa các hàng hay các cột để điều chỉnh kích thước của ô đó.
Còn em muốn nó tự động giãn ra co lại.
Như 1 file trong chương trình dự toán ở bài #1 của link này ( các ô tại cột E của sheet Du toan đều có thể tự động co giãn theo độ dài dữ liệu ta nhập vào).

 

[Ba Tê]

Vấn đề 1) Em thấy nối các chuỗi từ A1 đến A5 vào 1 ô là OK rồi. Nhưng bác có thể chỉnh code cho em để
+) Khi em muốn chọn vùng dữ liệu nào thì em sẽ quét chọn vùng dữ liệu đó và nhấn nút "XYZ" thì sẽ ra kết quả.
+) Em muốn hiện ra 1 bảng thông báo để mình chọn ô hiện kết quả mà không phải lúc nào cũng hiện kết quả ở I1
Vấn đề 2) Nếu dùng Wrap text thì cứ phải nháy kép vào giữa các hàng hay các cột để điều chỉnh kích thước của ô đó.
Còn em muốn nó tự động giãn ra co lại.
Như 1 file trong chương trình dự toán ở bài #1 của link này ( các ô tại cột E của sheet Du toan đều có thể tự động co giãn theo độ dài dữ liệu ta nhập vào).

Vấn đề 1 có thể chỉnh lại bằng Sub này:

Public Sub NoiChuoi()
Dim Cll As Range, Tem As String, D As String
For Each Cll In Selection
    Tem = Tem & Cll.Value & Chr(10)
Next
    D = InputBox("Nhap Dia chi Cell Ket qua", "GPE")
With Range(D)
    .Value = Left(Tem, Len(Tem) - 1)
    .HorizontalAlignment = xlLeft
    .VerticalAlignment = xlTop
    .WrapText = True
End With
End Sub

Vấn đề 2 thì tôi chưa làm lần nào nên chưa biết kiểu "quá tự động" này. Chờ các bạn khác xem sao.

 

[vanle33]

Vấn đề 1 có thể chỉnh lại bằng Sub này:

Public Sub NoiChuoi()
Dim Cll As Range, Tem As String, D As String
For Each Cll In Selection
    Tem = Tem & Cll.Value & Chr(10)
Next
    D = InputBox("Nhap Dia chi Cell Ket qua", "GPE")
With Range(D)
    .Value = Left(Tem, Len(Tem) - 1)
    .HorizontalAlignment = xlLeft
    .VerticalAlignment = xlTop
    .WrapText = True
End With
End Sub

Vấn đề 2 thì tôi chưa làm lần nào nên chưa biết kiểu "quá tự động" này. Chờ các bạn khác xem sao.

1) Vấn đề 1 đã OK . Em cám ơn bác
2) Vấn đề 2 e xin giải thích thêm
"Như 1 file trong chương trình dự toán ở bài #1 của link này ( các ô tại cột E của sheet Du toan đều có thể tự động co giãn theo độ dài dữ liệu ta nhập vào)."
thì khi em nhập dữ liệu vào cột E xong nhấn Enter thì kích thước của hàng chứa cột tự động thay đổi (tự giãn ra hoặc co lại) Em muốn vấn đề 2 được giải quyết giống hệt như vậy! mà không biết cách hiiii

 

[vanle33]

1) Vấn đề 1 đã OK . Em cám ơn bác
2) Vấn đề 2 e xin giải thích thêm
"Như 1 file trong chương trình dự toán ở bài #1 của link này ( các ô tại cột E của sheet Du toan đều có thể tự động co giãn theo độ dài dữ liệu ta nhập vào)."
thì khi em nhập dữ liệu vào cột E xong nhấn Enter thì kích thước của hàng chứa cột tự động thay đổi (tự giãn ra hoặc co lại) Em muốn vấn đề 2 được giải quyết giống hệt như vậy! mà không biết cách hiiii

File đầy đủ cho vấn đề 2 của em đây a

 

[vanle33]

1) Vấn đề 1 đã OK . Em cám ơn bác
2) Vấn đề 2 e xin giải thích thêm
"Như 1 file trong chương trình dự toán ở bài #1 của link này ( các ô tại cột E của sheet Du toan đều có thể tự động co giãn theo độ dài dữ liệu ta nhập vào)."
thì khi em nhập dữ liệu vào cột E xong nhấn Enter thì kích thước của hàng chứa cột tự động thay đổi (tự giãn ra hoặc co lại) Em muốn vấn đề 2 được giải quyết giống hệt như vậy! mà không biết cách hiiii

Các bác cho em cách giải quyết vấn đề 2 với a
(file ví dụ như bài #9)