các pác có thể cho mình biết hàm này là gì zay (2 người xem)

[ongtrungducmx25]

mình dùng hàm này để copy từ sheet1 sang sheet2 thì mình muốn lấy dữ liệu từ A110, thì công thức =sheet1!A1 kéo thả =sheet1!D10

xem file đính kèm nhé!

 

[tuyetbay]

mình dùng hàm này để copy từ sheet1 sang sheet2 thì mình muốn lấy dữ liệu từ A110, thì công thức =sheet1!A1 kéo thả =sheet1!D10

Bác ongtrungducmx25 đã hiểu lầm về việc lấy giá trị của 1 ô với 1 ô ở Sheet khác rồi!
Vầy nha! Nếu bác đang ở Sheet1 mà muốn lấy giá trị ở ô A1 thì gõ =A1 đúng không!
Hoặc có thể gõ =Sheet1!A1 thì có gì khác không?
Đúng rồi có đó. Vì nó có thêm cái tên Sheet1 nữa!
Tiếp nha!..
Nếu bác muốn lấy giá trị ở ô A1 của 1 sheet khác thì sao ta? Không lẽ lại gõ =A1 nữa. Vậy ta phải gõ =Sheet2!A1 đúng không.
Vậy, ta hiểu Sheetx!A1 sẽ được gõ nếu ta cần dữ liệu từ 1 nơi nào đó ngoài sheet hiện hành (tức là sheet chứa công thức cần tham chiếu). Hay nói cách khác: Nếu bác lấy giá trị ngay trên Sheet hiện hành ở đây ví dụ là Sheet1 thì =Sheet1!A1 sẽ chỉ còn =A1 thôi! Vì Excel sẽ tự hiểu rằng bác đang tham chiếu đến ô Sheet1!A1 rồi.
Vậy nha!
Không biết rằng có đúng ý đồ tác giả không ta? Nếu bác còn ý gì thì bác cần nêu rõ vấn đề hơn... chứ viết vầy thì em cũng không biết phải nói sao cho đúng nữa!
Thân..

 

[ongtrungducmx25]

cho em hỏi là khi em có 9 hoặc 10 trang có tên khác nhau,nay em muốn đổi tên 9 hoặc 10 trang đó bằng VBA thì viết code như thế nào! nhỉ

 

[tigertiger]

cho em hỏi là khi em có 9 hoặc 10 trang có tên khác nhau,nay em muốn đổi tên 9 hoặc 10 trang đó bằng VBA thì viết code như thế nào! nhỉ

lại câu hỏi khác và lạ:
trang ở đây là gì nhỉ là sheet ah???
còn nếu là page thì lấy đâu ra tên nhỉ

 

[ongtrungducmx25]

Cách đổi tên sheet

Xin cho hỏi có cách nào đổI tên các sheet là: mình có 10 trang mang tên, tam1,tam2,……tam10, mình muốn tạo một nút lệnh để đổI tên các sheet trên thành bang01,bang02,……………bang10
hoặc mình có 5 sheet: sheet1,…,sheet5 thì đổi tên thành mau01,……,mau05

 

[tigertiger]

Cách đổi tên sheet

Xin cho hỏi có cách nào đổI tên các sheet là: mình có 10 trang mang tên, tam1,tam2,……tam10, mình muốn tạo một nút lệnh để đổI tên các sheet trên thành bang01,bang02,……………bang10
hoặc mình có 5 sheet: sheet1,…,sheet5 thì đổi tên thành mau01,……,mau05

Thế thì đơn giản thế này:

Đổi tên tất cả các sheets

Public Sub DoiTenSheet()

Dim i As Byte
For i = 1 To ActiveWorkbook.Sheets.Count
    Sheets(i).Name = "bang" & Format(i, "00")
Next i

End Sub

.

suy ra Chỉ Đổi tên tất cả các sheets có tên bắt đầu bằng "tam"

Public Sub DoiTenSheetTam()

Dim i As Byte
For i = 1 To ActiveWorkbook.Sheets.Count
   If Left(Sheets(i).Name, 3) = "tam" Then _
       Sheets(i).Name = "bang" & Right(Sheets(i).Name, Len(Sheets(i).Name) - 3)
Next i

End Sub