Posts by chrisxs5

Re: Create report equally with Data and Subdata

OK so here is where I show my access ignorance.

I spent about an hour trying to figure out how to apply that into vba.
Naturally that is not how it is done. I love that union feature and will of course use it all the time now. I made the union query successfully. Once I found it in the menu it talk about minute to set it up. Thankyou very much I more than appreciate the help. :thanx:

I have a table with

familylastname, dadfirstname, dadbirthdate, momfirstname, mombirthdate
'then a subdatasheet with
childfirstname, childlastname, childbirthdate

I am trying to make a report like this

Birthdate, Lastname, Firstname
Birthdate, Lastname, Firstname
Birthdate, Lastname, Firstname

where it will put everyone in order by birthdate assigning the main tables last name to both firstnames, and put the subdata on the same sorting field with the main data. The childs lastname is assingned separtly. This is a church database that we are trying to make a Birthday list in order from Jan to Dec.

Re: Get Color from Color Fill on Formatting toolbar

Will do! Haven't started yet, it got re-priortized by the "man."

Re: Width Formatting is lost when I Copy to new Columns

Try this at the end of your run.

Cells.Select
    Cells.EntireColumn.AutoFit
    Range("A1").Select

Re: Get Color from Color Fill on Formatting toolbar

WOW!

I cant believe all the help, ideas and concepts you guys have come up with to help me out.
My apoligizes on not clearly defining my question and intent better at the beginning of the post. I am currently still working on the solution and will have my add-in ready by the end of the day. With all of your help I think I have it figured out.

Sorry for the 2 day lapse, but I am sure ya'll understand that "life happens."
Thank all of you very much.

Re: Get Active Window Title Bar Color

Take a look.
I will spend some time tonight looking through some books.

Re: Get Active Window Title Bar Color

Colour will come from the selected fill color on the menu bar.
If we wanted to change the cell color in excel with no vba we would use the fill color tool. I want to take the fill color and apply to any cell I select as I select the cell.

Re: Get Active Window Title Bar Color

I get "Invalide use of property".

Re: Get Active Window Title Bar Color

That is a much better title, thankyou!

Re: Use current Interior Color

Yep, I dont either. I think I am going in the right direction but still far away. All help still apprecaited.

Re: Use current Interior Color

Correct Barbarr,
Sorry was writing while all those came down.
Currently playing with what Bob posted.

Re: Use current Interior Color

Yes I have tried the recorder and now I have a list of the colors. What I want is if the fill color is set to red I want to use red if it is set to green I want to use it. All the ways I have tried to record only show me the index number versus how to use the color set in the fill box, on the formatting menu.

Here is the outline of what I am doing.

Select the color you want to use on the fill menu.
Check a box on the menu to turn feature on.
And now anywhere you click will be this color until the box is unchecked.

Re: Use current Interior Color

'Bump'

I am trying to create a macro that will toggle on and off. It will highlight the active cell upon its selction. I can set the code to whatever color I want, but I would like it to use the color set on the menu bar. Does anyone know how to do this?

My macro set with a random color

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
    ActiveCell.Select
    With Selection.Interior
        .ColorIndex = 7
    End With
End Sub

I will add the toggle later.

Re: Error 2015

You may want to post the rest of the code for us to look at.

Re: Sheet reference syntax error

I ran across a similar issue like this once I believe I was told to change it from .value to .text.

If that helps, great. If not, I ruled out one method for you.

Re: Pop up Calendar

Try this

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
    If Not Intersect(ActiveCell, Range("D20")) Is Nothing Then
        Calendar.Show
    End If
End Sub

Re: Execute a Subroutine from a different sheet

Put the macro in a module. Refer to this macro from your sheet and your button.

Private Sub Worksheet_Activate()
      Macroname
End Sub

And just assign the button to macroname as well.

Re: Assign autoformat to a macro

Quote from skiabox

...u must assign the classic2 style of autoformat to a macro so that u can use it to selected (from the user) cells.

First you must record the action and then assign it to a button or other object for use. These instructions should be very close to the start of your chapter.
What is the book? Maybe someone here has read that book.

Re: Start Macro X minutes after opening worksheet

Thats fantastic thinking, I will start on that right now. Thanks!