phulien1902
GPE - My love
- Tham gia
- 6/7/13
- Bài viết
- 3,543
- Được thích
- 4,424
1 cách khác, bạn có thể tham khảo:Em có file này muốn nhờ anh chị đặt công thức dùm em ạ.
Dữ liệu là giống nhau, nhưng cách trình bày thì khác nhau. Em muốn có nút xổ chọn để in các kiểu form khác nhau ạ.
Em có gửi file đính kèm đây ạ.
+ Code Sheets("Show"):
PHP:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$H$2" Then
[H3].Resize(99).ClearContents
abc
End If
End Sub
PHP:
Sub abc()
Dim i%, LR%
LR = Cells(Rows.Count, 1).End(3).Row
For i = 1 To LR
If Cells(i, 1) = "Cách trình bày " & Cells(2, 8) & ":" Then
Cells(i, 1).Offset(1).Resize(4).Copy [H3]
End If
Next
End Sub