Working with multiple email addresses

I use Outlook 2000. I have several email addresses I use for different purposes and continually forget to change the “from address” when jumping between responses. How would I set up buttons on the toolbar which would allow me to do this quickly and also let me see which one is currently active? Is this possible with VBA? Any other suggestions?