Add unique value automatically to sheets("to.") and sheets("total")

[HaroonSid]

hi, everyone

i have three worksheets on my workbook
1 = "TO."
2 = "ENTRY"
3 = "TOTAL"

I add data sheets("entry").range("c10:c300"). so when i add data here then automatically add same but unique to sheets("to.").range("b4:b100") and sheets("total").range("c4"c100")

for example
i add "haroon" in range sheets("entry").range("c10:c300")

then "haroon" auto add to sheets("to.") and sheets("total") in range

if "haroon" already added in sheets("to.") and sheets("total") then ignore it


I Think this will done with worksheet_change event

Please Login or Register  to view this content.

thanx a lot

[bakerman2]

Done it in 2 different ways so you can choose.

Please Login or Register  to view this content.

[HaroonSid]

Thank you Forum Expert once again

working perfectly as i wanted

but i have one more question, if i want to use NameRange instead of simple range
i mean

"ABD" for sheets("to.").range("b4:b100")

"ABE" for sheets("total").range("c4"c100")

[daboho]

Please Login or Register  to view this content.

[Winon]

Hello daboho,

Please when you are posting any Code ensure you use Code Tags.

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Click on Edit to open your thread, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

Thank you.

[bakerman2]

Try this.
Add following code to Standard module.

Please Login or Register  to view this content.

Then in Sheet module.

Please Login or Register  to view this content.

[HaroonSid]

Thanx a lot dear bakerman2 once again

its working perfectly



you solved my big problem

[bakerman2]

You're welcome and thanks for adding rep points. (again )

[HaroonSid]

Hey bakerman2 u deserve better then rep+

btw dear i am getting little problem here

this code is slow. should i use "Application.EnableEvents" here or any other idea?

Please Login or Register  to view this content.

[HaroonSid]

Hey bakerman2 u deserve better then rep+

btw dear i am getting little problem here

this code is slow. should i use "Application.EnableEvents" here or any other idea?

Please Login or Register  to view this content.

[bakerman2]

If there are a lot of formulas involved you could start by setting calculation to manual at the start. (don't forget to reset at the end)
Also instead of searching entire column you could search in Named Range only. (see Post#6)