Cookies

1/2 cup softened butter
1/2 cup  brown sugar

1/4 cup White granulated sugar

1 egg

1/4 tsp vanilla extract

1 1/2 cup flour

1/2 tsp baking soda

1/2 cup 3.25% milk

1/2 of a 390g bag of mini chocolate chips
Preheat oven to 375
In a large bowl, using an electric mixer, beat butter, brown sugar, sugar and vanilla extract until fluffy. Beat in egg. Add flour, baking soda and milk and stir with a wooden spoon. Add chocolate chips. 

Bake, one sheet at a time, for 10 to 15 min or until golden around the edges and set in the centre. Let cool on sheets for 2 min, then transfer to racks to cool.
Made 4 dozen with a cookie scoop 

Hamburger breakfast 

This one would have worked better with a little more store bought. 

Take your favorite hamburger patty (I made some hamburger rings so it looks messy)

 Cut out the centre to leave a ring (I think it would be better to do this after they’re partially cooked)

Pan fry until almost cooked – use a lid to cook more evenly 

Drop an egg in the centre

Cook egg

Serve like hamburger – yup cheese works here. 

I also should have thawed hamburger buns for this one. 

Edit: store bought burgers fall apart too. 

Snowman Breakfast in a cup

• Preheat oven to 425 ish• Grease muffin tin with soft butter

• Cook 1/2 lb bacon cut in 1/2 to taste
• Pancake cups (makes 7-9)

• 1 1/2 cups all-purpose flour

• 1 1/2 teaspoons baking powder

• 1 teaspoon salt

• 1 tablespoon white sugar

• 1 1/4 cups milk

• 1 egg

• 3 tablespoons butter, melted

• Splash of vanilla
Whisk until smooth and pour into muffin cups until 1/2-3/4 full 
Then used 

• melted butter (2tbsp ish)

• 1/4 c milk

• 3-4 eggs

• grill seasoning (dill, garlic powder, seasoning salt and pepper)

• abt 1/4 cup shredded cheese

• Optional: any other omelette toppings you like
• whip and pour into muffin cups about 3/4 full. 
• Bake until eggs look like omelettes

• Drizzle pancakes with syrup
Serve all together with a side of strawberries and glass of milk

Garlic sticks

1 cup warm water

2 tbsp sugar

1/4 melted butter

1tsp active dry yeast

Mix and wait til it foams

3 cups flour

1 1/2 tsp salt

Mix, kneed, let rise

Roll out and cut into sticks

Brush with melted butter and garlic salt

Bake at 400 for 15 min or until golden

Dip in melted butter with garlic salt 

Mix 

Work with a folder of files

This is a little more code than I usually want to post, but it all fits together – and isn’t a complete set. 


Public Sub GetSheets()
Dim fd As FileDialog
Dim varRootFolder As Variant
Dim strRootPath As String
Dim strTimeSheetFileName As String
Dim strCompilerFileName As String


strRootPath = ActiveWorkbook.Path
strCompilerFileName = ActiveWorkbook.Name
'Select Root folder

We will use the file dialog to have the user select a folder of data. This requires a reference.
These settings will allow a single folder only and start where the current folder resides.

Set fd = Application.FileDialog(msoFileDialogFolderPicker)
With fd
.Title = "Select a folder to compile"
.AllowMultiSelect = False
.InitialFileName = strRootPath
If .Show = -1 Then

This loop will use the name of the selected folder and add a \

For Each varRootFolder In .SelectedItems
strRootPath = varRootFolder & "\"
Next varRootFolder

End If


End With
Set fd = Nothing

Next we count the Excel files in the selected folder.

'Count all files under Root folder

strSheetFileName = Dir(strRootPath & "*.Xlsx")
Do While strSheetFileName <> ""
If strSheetFileName <> strCompilerFileName Then
FileCount = FileCount + 1
end if
strSheetFileName = Dir()
Loop

Go to pasta sauce 

Here’s a simple pasta sauce. 

Brown a pack of ground hamburger

Pour 2 cans of tomato sauce over it with 

1 tbsp oregano

1 tsp onion salt

1 tsp garlic powder

1 pinch dried chives

1 tsp seasoning salt 

2 cups frozen veggies (we like corn) 

Simmer until pasta is ready. 

Any left overs store in oven safe container with pasta and cover in cheese 

Eggs Benny

Eggs benny
Knorr hollindaise sauce as per package. In the last thickening phase, add a tsp of dill

Toast a cheese English muffin 
Butter it fresh out of toaster 
Cut a circle of classic ham 3/16″ thick and pan fry it. 
Smear cream cheese on the heated ham 
Add a poached egg (use egg container to cut ham)
Pour hollindaise over the tower of yummy 

Working with a month’s data

This subroutine will increment a month in a provided cell.

Sub AddMonth()
Dim sDate As String, dDate As Date

setUp

Sheets("Month").Select
Range("A3").Select
If IsNull(Sheets("Month").Range("A3").Select) Or Sheets("Month").Range("A3").Value = "" Then
Selection.End(xlToRight).Select
End If
sDate = ActiveCell.Value
dDate = CDate(sDate)

If Day(dDate) 1 Then
dDate = DateAdd("D", -Day(dDate) + 1, dDate)
End If
dDate = DateAdd("M", 1, dDate)
Sheets("Month").Range("G1:H1").Value = Format(dDate, "mmmm-yyyy")
fillMonth dDate

closeOut
End Sub

Then you can update a given month

Sub UpdateMonth()
Dim sDate As String, dDate As Date
setUp
Sheets("Month").Select
Range("A3").Select
If IsNull(Range("A3").Select) Or Range("A3").Value = "" Then
Selection.End(xlToRight).Select
End If
sDate = Sheets("Month").Range("G1").Value
dDate = CDate(sDate)

fillMonth dDate
closeOut
End Sub

Or decrement a month

Sub SubMonth()
setUp
Dim sDate As String, dDate As Date

Sheets("Month").Select
Range("A3").Select
If IsNull(Range("A3").Select) Or Range("A3").Value = "" Then
Selection.End(xlToRight).Select
End If
sDate = ActiveCell.Value
dDate = CDate(sDate)

If Day(dDate) 1 Then
dDate = DateAdd("D", -Day(dDate) + 1, dDate)
End If
dDate = DateAdd("M", -1, dDate)
Range("G1:H1").Value = Format(dDate, "mmmm-yyyy")
fillMonth dDate
closeOut
End Sub

Is it a number?

Sometimes you’re working with a large amount of data, and you only want the numbers to be added to a total. This function will convert all non numbers to 0 and add it to the total you pass in.
 

Function convertHours(sHours As String, dHours As Double) As String
If dHours = 0 Then
sHours = "0"
Else
If Not IsNumeric(sHours) Then
sHours = "0"
End If
End If
convertHours = sHours
End Function