Lỗi tách sheets khi lập trình VBA " That name is already taken.try a different one"

Liên hệ QC
Có cách nào để nó lên tên đơn vị và mã số thuế.... ở đoạn này ko bạn :)
File và code bạn đưa lên, có phải do bạn làm không vậy ? :)
Nếu bạn đã viết được như vậy rồi, thì việc chèn thêm 1 dòng nữa nó đâu có khó khăn gì đâu ?
Ví dụ:
đoạn
PHP:
Sheets(Item).[A1].PasteSpecial xlPasteFormats
Thêm bên dưới thông tin
PHP:
Sheets(Item).[B6] = Item
rồi từ đó bạn tự xào nấu sao cho phù hợp ý bạn muốn.

P/S: Thực tế tổng thể bài của bạn nó không có khó, chỉ là cơ bản xuất thông tin theo từng công ty.
Nhiều cách làm đơn giản và nhẹ nhàng hơn. Rất nhiều các anh chị trong này thừa sức làm, nhưng do bạn hỏi từng nhát từng nhát.
Và phần yêu cầu của bạn nó đi vào từng mục rất nhỏ, nên nhiều người ngại chia sẻ.
Sắp tới bạn sẽ hỏi sao format cho đẹp ? >> đổi ngược mã công ty thành tên ? >> thêm ngày tháng ? >> đánh lại số thứ tự ? >> đếm số lượng nhân viên ?
 
Lần chỉnh sửa cuối:
File và code bạn đưa lên, có phải do bạn làm không vậy ? :)
Nếu bạn đã viết được như vậy rồi, thì việc chèn thêm 1 dòng nữa nó đâu có khó khăn gì đâu ?
...
Lính của đương sự viết.
Đương sự không thể bảo ngược lại người viết code chỉnh bởi vì sợ chúng khám phá ra mình chưa hiểu code.
Lên GPE nhờ chỉnh thì ngoài mục đích hoàn thiện code còn là cơ hội được giải thích mọt số gút mắc. Đó là chưa kể đoi khi có người chỉ cho cách làm xịn hơn.
Đem về chỉnh lại cho đẹp (cốt ý là để có thể coi như code chính mình hoàn thiện) và có dịp trộ với lính.

Tôi nói thế có dễ hiểu chưa? Không hiểu thì cũng ráng chịu, tôi không thể nói hơn. Quá giới hạn này thành ra "nói xấu thành viên khác".
 
File và code bạn đưa lên, có phải do bạn làm không vậy ? :)
Nếu bạn đã viết được như vậy rồi, thì việc chèn thêm 1 dòng nữa nó đâu có khó khăn gì đâu ?
Ví dụ:
đoạn
PHP:
Sheets(Item).[A1].PasteSpecial xlPasteFormats
Thêm bên dưới thông tin
PHP:
Sheets(Item).[B6] = Item
rồi từ đó bạn tự xào nấu sao cho phù hợp ý bạn muốn.

P/S: Thực tế tổng thể bài của bạn nó không có khó, chỉ là cơ bản xuất thông tin theo từng công ty.
Nhiều cách làm đơn giản và nhẹ nhàng hơn. Rất nhiều các anh chị trong này thừa sức làm, nhưng do bạn hỏi từng nhát từng nhát.
Và phần yêu cầu của bạn nó đi vào từng mục rất nhỏ, nên nhiều người ngại chia sẻ.
Sắp tới bạn sẽ hỏi sao format cho đẹp ? >> đổi ngược mã công ty thành tên ? >> thêm ngày tháng ? >> đánh lại số thứ tự ? >> đếm số lượng nhân viên ?
Cám ơn bạn. Vì thực tế mình không làm về cái này, chỉ là thi thoảng gặp nên mới lên mạng tìm hiểu. Code là cũng người khác chia sẻ và khi áp dụng vào mình ko hiểu được nên làm mò. Và khi phát sinh thêm thì mình cũng phải hỏi. vì mình ko được học. bạn thông cảm.
Bài đã được tự động gộp:

File và code bạn đưa lên, có phải do bạn làm không vậy ? :)
Nếu bạn đã viết được như vậy rồi, thì việc chèn thêm 1 dòng nữa nó đâu có khó khăn gì đâu ?
Ví dụ:
đoạn
PHP:
Sheets(Item).[A1].PasteSpecial xlPasteFormats
Thêm bên dưới thông tin
PHP:
Sheets(Item).[B6] = Item
rồi từ đó bạn tự xào nấu sao cho phù hợp ý bạn muốn.

P/S: Thực tế tổng thể bài của bạn nó không có khó, chỉ là cơ bản xuất thông tin theo từng công ty.
Nhiều cách làm đơn giản và nhẹ nhàng hơn. Rất nhiều các anh chị trong này thừa sức làm, nhưng do bạn hỏi từng nhát từng nhát.
Và phần yêu cầu của bạn nó đi vào từng mục rất nhỏ, nên nhiều người ngại chia sẻ.
Sắp tới bạn sẽ hỏi sao format cho đẹp ? >> đổi ngược mã công ty thành tên ? >> thêm ngày tháng ? >> đánh lại số thứ tự ? >> đếm số lượng nhân viên ?
Một lần nữa cám ơn bạn và mọi người :)
Bài đã được tự động gộp:

Lính của đương sự viết.
Đương sự không thể bảo ngược lại người viết code chỉnh bởi vì sợ chúng khám phá ra mình chưa hiểu code.
Lên GPE nhờ chỉnh thì ngoài mục đích hoàn thiện code còn là cơ hội được giải thích mọt số gút mắc. Đó là chưa kể đoi khi có người chỉ cho cách làm xịn hơn.
Đem về chỉnh lại cho đẹp (cốt ý là để có thể coi như code chính mình hoàn thiện) và có dịp trộ với lính.

Tôi nói thế có dễ hiểu chưa? Không hiểu thì cũng ráng chịu, tôi không thể nói hơn. Quá giới hạn này thành ra "nói xấu thành viên khác".
Vâng . Mặc dù không hiểu nhưng cũng cám ơn mọi người đã bớt chút tham và giúp đỡ :).
 
Web KT
Back
Top Bottom