Time Slot Reservation Form

**dknightstone** · 03-30-2017, 06:50 PM

At work, we have 12 people sharing 4 accounts for a web service that doesn't allow multiple people logged on at the same time. So, we have to send out an email declaring that we are using X account until X:XXPM. I want to make a shared excel sheet for people to input their times. I have a chart with times in 15 minute increments on the y axis, and the 4 account names across the top on the x axis. Ideally, I would like to create a system where you choose an account to log on to, and an allotted time frame (30 minutes/1 hour) and it updates the chart automatically. It doesn't need to say who is using the account or anything, just that an account is being used. Any help would be greatly appreciated! I have a very basic command of excel so I could be thinking way too complex here but I figured, what the heck? worth a shot.

**Logit** · 03-30-2017, 08:20 PM

Try this :

Paste this code into the Sheet level module ...

OOption Explicit

Sub ColorRng()

        'Then change the background to the specified color
        Selection.Interior.Color = RGB(255, 255, 204)
        
        With Selection
            .Borders(xlEdgeLeft).LineStyle = xlContinuous
            .Borders(xlEdgeTop).LineStyle = xlContinuous
            .Borders(xlEdgeRight).LineStyle = xlContinuous
            .Borders(xlEdgeBottom).LineStyle = xlContinuous
        End With
   
End Sub

Sub ClearColor()
    
        'Then clear the background color
       Selection.Interior.ColorIndex = xlNone
       
       With Selection
            .Borders(xlEdgeLeft).LineStyle = xlNone
            .Borders(xlEdgeTop).LineStyle = xlNone
            .Borders(xlEdgeRight).LineStyle = xlNone
            .Borders(xlEdgeBottom).LineStyle = xlNone
        End With
        
End Sub

The method of click / drag a range to change colors is cumbersome. Use of the command buttons is a sure thing.