userform selections to appear in a separate popup window

[westwind]

Can someone please provide me with code that will take selections made in a userform via checkboxes, and display the results in a separate popup window.

I have 50 columns of cities on Sheet 1, each with 15 rows of data. I’d like call up a userform that contains checkboxes for each city. I created a userform and arranged the checkboxes in 4 separate vertical categories (columns), one for each Time Zone (ET, CT, MT and PT).

I’d like to be able to select any number of boxes (cities) in any of the 4 time zone categories and have the data for those cities (from Sheet 1) appear in a separate popup window so that I can close Excel and keep that window open (if possible). Also, I’d like the data to be displayed with some space between each time zone group.

Is this possible, and if so, what would the code be? If not, then what are the alternatives?

Thanks in advance for any help.

 

[Joe Was]

Post the code you have and I will fix it!

 

[westwind]

I don't have any code - I'm hoping someone here can provide me with something

 

[Damon Ostrander]

Hi westwind,

Everything that you describe is possible with the exception of "closing" Excel while keeping the popup, unless by "close Excel" you simply mean minimizing its process (which keeps its process running and minimized to the task bar).

However, I would like to suggest an alternative approach, since creating all those checkboxes (50 x 4?) could be a bit tedious. I would suggest you use four listboxes (one for each time zone) displaying the list of cities, with the listboxes all being multi-select capable and having checkboxes next to each item. To make a listbox multi-select, set its MultiSelect property to fmMultiSelectMulti, and have it display checkboxes set its ListStyle property to fmListStyleOption.

Regarding providing code, I don't think I understand your overall layout, the data, and how you would like the data presented to do that. I'm sure the solution is very straightforward, but also a bit tedious, and this may be a deterrent to getting a solution on this board. I would suggest you try to present a very simplified example showing your data and how you would like the results presented. For example, just 3 cities, two time zones, and just a few rows of data. Then you could extrapolate the solution received to the full problem.

I hope this helps.

Damon

 

[westwind]

Thanks Damon!

You’re right, the multi-set listbox is a much better idea (btw, there are only 50 cities or columns, not 50 x 4).

Ok, I think the easiest way is to just use the 4 listbox (one for each time zone) and select the cities I’d like to hide and forget the popup window. There are various (non-adjacent) rows I’d like to hide as well.

I have the following simple code to hide columns & rows but I need help in modifying it to work for the above situation and listboxes. Again, any help is appreciated.

Private Sub ToggleButton1_Click()
    Application.ScreenUpdating = False
    If ToggleButton1.Value = True Then
        Application.Calculation = xlCalculationManual
        Columns("C:C").EntireColumn.Hidden = Not Columns("C:C").EntireColumn.Hidden
    Else
        Columns("C:C").EntireColumn.Hidden = Not Columns("C:C").EntireColumn.Hidden
    End If
    Application.ScreenUpdating = True
End Sub

Private Sub ToggleButton2_Click()
    Application.ScreenUpdating = False
    If ToggleButton2.Value = True Then
        Application.Calculation = xlCalculationManual
        For Each rCell In Range("A5:A8")
            rCell.EntireRow.Hidden = rCell = ""
        Next rCell
        Application.Calculation = xlCalculationManual
    Else
        Range("A5:A8").EntireRow.Hidden = False
    End If
    Application.ScreenUpdating = True
End Sub