I'm working in Japan, which is still stuck in the last century in many, many ways. For reasons beyond my comprehension, my company's new partner requires us to send them .csv files formatted in a very specific way and they cannot be in UTF-8. They must be in Shift-JIS or their software won't accept it.
Excel offers three .csv formats in its save dialog:

• CSV UTF-8 (Comma-delimited) (.csv)
• Macintosh Comma Separated (.csv)
• MS-DOS Comma Separated (.csv)

The UTF-8 one is obviously not an option, and the other two both generate files that look exactly the same but replace each Japanese character with '_'.
So that doesn't work.
If you're using Windows in Japanese, I believe saving to .csv defaults to Shift-JIS, but I am using a Mac in English.
Currently the workflow is:

1. Prepare the document in Excel manually.
2. Open the .xlsx file in Apple Numbers.
3. Export to .csv, manually selecting "Japanese (Shift JIS)" under Advanced Options.

This works as a temporary stopgap, but I want to do this entirely in VBA if at all possible, as the people who will be using the file are not very technically-minded.
Most of the solutions I've found elsewhere are related to converting things to UTF-8.
I've searched a bit in Japanese, but most of the solutions I've found assume you're starting in a Shift-JIS environment and want to convert to UTF-8. The go-to solution seems to be using ADODB.Stream by writing each cell's contents to a string variable, sticking commas and carriage returns in as necessary, then dumping it in the stream and saving the stream to a .csv. As an example:

 With output .Type = adTypeText .Charset = "UTF-8" .Open For k = 1 To mySheetCnt Worksheets(mySheetName(k)).Select maxRow = ActiveSheet.Range("A1").End(xlDown).Row maxCol = ActiveSheet.Range("A1").End(xlDown).Col For iCnt = 1 To maxRow For jCnt = 1 To maxCol val = Cells(iCnt, jCnt) if (jCnt < maxCol) .WriteText val & "," if (jCnt = maxCol) .WriteText val, adWriteLine End If Next jCnt Next iCnt Next k .SaveToFile fileSaveName, adSaveCreateOverWrite .Close End With 

This may work (assuming simply changing .Charset to "Shift-JIS" will do the trick), but it seems awfully... inelegant.
Is there a simplebetter way to just save a worksheet to .csv and set the character encoding on save? (Bonus points if it's an export so it doesn't turn the active workbook into a .csv.)
Environment details: macOS 14 Sonoma Microsoft Office 365 Version 16.85 (24051214)

Hey everyone! Twilight Masquerade drops on Friday, but I won't be around then, so the update comes today! A new set means an update to the workbook! Go get your new shiny cardboard!
As always, I thank you for your support and the users out there that help me so much with this huge task. A special shout out to jab2004 who was the original creator and maintainer of this workbook.
As with every release, I tried to correct a lot of omissions and errors that were reported to me since the previous release. If you find anything amiss, please let me know!
JUST JUMPING IN?
If you're just jumping in or if you've been with me from the start, definitely make sure to check out the User Guide tab and read the instructions. I hope it makes things pretty clear. Don't be afraid to ask me questions!
LINK

• Version 9.7: https://www.dropbox.com/scl/fi/g0sbmsjeuk73r05itvett/PokemonTCG_EmptyCheckList_v9.7.xlsm?rlkey=hbc0v3m89215sm7ycecnb0v23&st=p66dhkm5&dl=0

CHANGELOG
The following changes and additions have been made: 9.7

• Added - Twilight Masquerade
• Added - 4 2023 World Chamionships Decks (Mew's Revenge, Psychic Elegance, Colorless Lugia, Lost Box Kyogre)

• Updated SV Black Star Promos (105-118, 123, 126, 129, 132, 142-143, 148-149)
• Updated - Jumbo Cards, added Iron Crown ex, Raging Bolt ex, Grafaiai ex, and Palafin ex
• Updated - Championship Cards, added Geeta, Professor Turo's Scenario, and Nest Ball
• Updated - Blister Exclusives, added exclusives from Paldea Evolved, Paradox Rift, Temporal Forces, and Twilight Masquerade releases
• Updated - Additional Cards, added Iono Premium Tournament Collection exclusive, Armarouge ex Premium Collection exclusives, Twilight Masquerade Build & Battle exclusives, Twilight Masquerade store exclusives
• Updated - Renamed "McDonalds Collection" to McDonald's Collection". Renamed "WCD2015 - Punches N Bites" to "WCD2015 - Punches 'N' Bites".
• Updated - VBA Code handles sets with apostrophes in them now, except for Champion's Path (Still Champions Path, no apostrophe)

Note: The following updates will cause copying from previous workbooks to get messed up on these worksheets.

• Updated - SV Black Star Promos, distinguished between Classic and HD Cosmos Holofoils for 023 Smoliv (row 34), 024 Growlithe (row 36), 046 Bulbasaur (row 72), 048 Charmander (row 74), and 048 Squirtle (row 76)
• Updated - Alternative Art Cards, removed Ultra Necrozma GX (line 36) as it doesn't exist
• Updated - Additional Cards, distinguished between Classic and HD Cosmos Holofoil for Abra from 151 (row 631) and Electabuzz from 151 (row 634). Also added Brute Bonnet (row 648), added Iron Moth (row 650), removed Magikarp (row 652), added Paldea Mini Tin 5-Pack exclusives (rows 657-660), added Paldea Advent Chest exclusives (rows 676-678), moved June 2024 Play! Pokémon Promos to rows 696-698

Will be added in future update: "Pokemon TCG Gym" stamped English cards released in Southeast Asian countries - a lot out there and very hard to catalogue right now
CARD IMAGES
This Collection workbook supports card images through the use of Excel macros I have written.
In order to use this resource, you must have these card picture folders located in the same folder as the Collection workbook. You also need macros enabled in Excel. From there you should be good to go.
Mega Link to Card Pictures: No longer maintaining. Google Drive seems to work just fine.
Google Drive Link to Card Pictures: https://drive.google.com/drive0/folders/1mcIqeXLY3wS8u8fRD0T7mcxnLzINgRBZ -- new main source, let me know if there are issues!
The link above includes at least the following:

• All main set releases, including the latest set, Twilight Masquerade
• All black star promos (with some SWSH and SV missing, for now)
• Select other promos

I am definitely looking for feedback on these card images and let me know if you find any that aren't working the way they are supposed to, as there are a ton of images here!
If you have any questions/comments/concerns, please let me know. Most of all, have fun!

Hey everyone! Twilight Masquerade drops on Friday, but I won't be around then, so the update comes today! A new set means an update to the workbook! Go get your new shiny cardboard!
As always, I thank you for your support and the users out there that help me so much with this huge task. A special shout out to jab2004 who was the original creator and maintainer of this workbook.
As with every release, I tried to correct a lot of omissions and errors that were reported to me since the previous release. If you find anything amiss, please let me know!
JUST JUMPING IN?
If you're just jumping in or if you've been with me from the start, definitely make sure to check out the User Guide tab and read the instructions. I hope it makes things pretty clear. Don't be afraid to ask me questions!
LINK

• Version 9.7: https://www.dropbox.com/scl/fi/g0sbmsjeuk73r05itvett/PokemonTCG_EmptyCheckList_v9.7.xlsm?rlkey=hbc0v3m89215sm7ycecnb0v23&st=p66dhkm5&dl=0

CHANGELOG
The following changes and additions have been made: 9.7

• Added - Twilight Masquerade
• Added - 4 2023 World Chamionships Decks (Mew's Revenge, Psychic Elegance, Colorless Lugia, Lost Box Kyogre)

• Updated SV Black Star Promos (105-118, 123, 126, 129, 132, 142-143, 148-149)
• Updated - Jumbo Cards, added Iron Crown ex, Raging Bolt ex, Grafaiai ex, and Palafin ex
• Updated - Championship Cards, added Geeta, Professor Turo's Scenario, and Nest Ball
• Updated - Blister Exclusives, added exclusives from Paldea Evolved, Paradox Rift, Temporal Forces, and Twilight Masquerade releases
• Updated - Additional Cards, added Iono Premium Tournament Collection exclusive, Armarouge ex Premium Collection exclusives, Twilight Masquerade Build & Battle exclusives, Twilight Masquerade store exclusives
• Updated - Renamed "McDonalds Collection" to McDonald's Collection". Renamed "WCD2015 - Punches N Bites" to "WCD2015 - Punches 'N' Bites".
• Updated - VBA Code handles sets with apostrophes in them now, except for Champion's Path (Still Champions Path, no apostrophe)

Note: The following updates will cause copying from previous workbooks to get messed up on these worksheets.

• Updated - SV Black Star Promos, distinguished between Classic and HD Cosmos Holofoils for 023 Smoliv (row 34), 024 Growlithe (row 36), 046 Bulbasaur (row 72), 048 Charmander (row 74), and 048 Squirtle (row 76)
• Updated - Alternative Art Cards, removed Ultra Necrozma GX (line 36) as it doesn't exist
• Updated - Additional Cards, distinguished between Classic and HD Cosmos Holofoil for Abra from 151 (row 631) and Electabuzz from 151 (row 634). Also added Brute Bonnet (row 648), added Iron Moth (row 650), removed Magikarp (row 652), added Paldea Mini Tin 5-Pack exclusives (rows 657-660), added Paldea Advent Chest exclusives (rows 676-678), moved June 2024 Play! Pokémon Promos to rows 696-698

Will be added in future update: "Pokemon TCG Gym" stamped English cards released in Southeast Asian countries - a lot out there and very hard to catalogue right now
CARD IMAGES
This Collection workbook supports card images through the use of Excel macros I have written.
In order to use this resource, you must have these card picture folders located in the same folder as the Collection workbook. You also need macros enabled in Excel. From there you should be good to go.
Mega Link to Card Pictures: No longer maintaining. Google Drive seems to work just fine.
Google Drive Link to Card Pictures: https://drive.google.com/drive0/folders/1mcIqeXLY3wS8u8fRD0T7mcxnLzINgRBZ -- new main source, let me know if there are issues!
The link above includes at least the following:

• All main set releases, including the latest set, Twilight Masquerade
• All black star promos (with some SWSH and SV missing, for now)
• Select other promos

I am definitely looking for feedback on these card images and let me know if you find any that aren't working the way they are supposed to, as there are a ton of images here!
If you have any questions/comments/concerns, please let me know. Most of all, have fun!

Hey everyone! Twilight Masquerade drops on Friday, but I won't be around then, so the update comes today! A new set means an update to the workbook! Go get your new shiny cardboard!
As always, I thank you for your support and the users out there that help me so much with this huge task. A special shout out to jab2004 who was the original creator and maintainer of this workbook.
As with every release, I tried to correct a lot of omissions and errors that were reported to me since the previous release. If you find anything amiss, please let me know!
JUST JUMPING IN?
If you're just jumping in or if you've been with me from the start, definitely make sure to check out the User Guide tab and read the instructions. I hope it makes things pretty clear. Don't be afraid to ask me questions!
LINK

• Version 9.7: https://www.dropbox.com/scl/fi/g0sbmsjeuk73r05itvett/PokemonTCG_EmptyCheckList_v9.7.xlsm?rlkey=hbc0v3m89215sm7ycecnb0v23&st=p66dhkm5&dl=0

CHANGELOG
The following changes and additions have been made: 9.7

• Added - Twilight Masquerade
• Added - 4 2023 World Chamionships Decks (Mew's Revenge, Psychic Elegance, Colorless Lugia, Lost Box Kyogre)

• Updated SV Black Star Promos (105-118, 123, 126, 129, 132, 142-143, 148-149)
• Updated - Jumbo Cards, added Iron Crown ex, Raging Bolt ex, Grafaiai ex, and Palafin ex
• Updated - Championship Cards, added Geeta, Professor Turo's Scenario, and Nest Ball
• Updated - Blister Exclusives, added exclusives from Paldea Evolved, Paradox Rift, Temporal Forces, and Twilight Masquerade releases
• Updated - Additional Cards, added Iono Premium Tournament Collection exclusive, Armarouge ex Premium Collection exclusives, Twilight Masquerade Build & Battle exclusives, Twilight Masquerade store exclusives
• Updated - Renamed "McDonalds Collection" to McDonald's Collection". Renamed "WCD2015 - Punches N Bites" to "WCD2015 - Punches 'N' Bites".
• Updated - VBA Code handles sets with apostrophes in them now, except for Champion's Path (Still Champions Path, no apostrophe)

Note: The following updates will cause copying from previous workbooks to get messed up on these worksheets.

• Updated - SV Black Star Promos, distinguished between Classic and HD Cosmos Holofoils for 023 Smoliv (row 34), 024 Growlithe (row 36), 046 Bulbasaur (row 72), 048 Charmander (row 74), and 048 Squirtle (row 76)
• Updated - Alternative Art Cards, removed Ultra Necrozma GX (line 36) as it doesn't exist
• Updated - Additional Cards, distinguished between Classic and HD Cosmos Holofoil for Abra from 151 (row 631) and Electabuzz from 151 (row 634). Also added Brute Bonnet (row 648), added Iron Moth (row 650), removed Magikarp (row 652), added Paldea Mini Tin 5-Pack exclusives (rows 657-660), added Paldea Advent Chest exclusives (rows 676-678), moved June 2024 Play! Pokémon Promos to rows 696-698

Will be added in future update: "Pokemon TCG Gym" stamped English cards released in Southeast Asian countries - a lot out there and very hard to catalogue right now
CARD IMAGES
This Collection workbook supports card images through the use of Excel macros I have written.
In order to use this resource, you must have these card picture folders located in the same folder as the Collection workbook. You also need macros enabled in Excel. From there you should be good to go.
Mega Link to Card Pictures: No longer maintaining. Google Drive seems to work just fine.
Google Drive Link to Card Pictures: https://drive.google.com/drive0/folders/1mcIqeXLY3wS8u8fRD0T7mcxnLzINgRBZ -- new main source, let me know if there are issues!
The link above includes at least the following:

• All main set releases, including the latest set, Twilight Masquerade
• All black star promos (with some SWSH and SV missing, for now)
• Select other promos

I am definitely looking for feedback on these card images and let me know if you find any that aren't working the way they are supposed to, as there are a ton of images here!
If you have any questions/comments/concerns, please let me know. Most of all, have fun!

Hey, im building an automation in excel using VBA, tried using the averageif function like this:
Application.WorksheetFunction.AverageIf(ws.Columns(numericCol), ws.Cells(ws.Rows.count, col), ws.Columns(numericCol)) * (1 - percentage)
But it didnt work well. i also tried using it like this:
Application.WorksheetFunction.AverageIf(ws.Columns(col), "=" & uniqueValue, ws.Columns(col)) * (1 - X)
but it seems also to not be working.
im not really sure how im suppose to use it to be honest.. when im running my code i get "424 runtime error object required" or "1004 runtime error", which is something i dont understand about averageif can not get info about worksheetfunctions? idk.. attached below my entire code of the functio, would like your help :)

Function GenerateStringColumnSummary(ByVal percentage As Double) As Worksheet Dim ws As Worksheet Dim originalData As Range Dim summaryWs As Worksheet Dim dataTypes As Variant Dim lastCol As Long, lastRow As Long Dim col As Long, row As Long Dim uniqueValues As Collection Dim cell As Range Dim headerName As String Dim numericCol As Long Dim lowerBound As Double, upperBound As Double Dim belowCount As Long, rangeCount As Long, aboveCount As Long Dim item As Variant ' <-- Added this line ' Store reference to the original active sheet Set ws = ThisWorkbook.ActiveSheet ' Set the summary worksheet On Error Resume Next Set summaryWs = ThisWorkbook.Sheets("String Column Summary") On Error GoTo 0 If summaryWs Is Nothing Then Set summaryWs = ThisWorkbook.Sheets.Add(After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.count)) summaryWs.Name = "String Column Summary" Else summaryWs.Cells.Clear End If ws.Activate ' Get data types of each column dataTypes = GetColumnDataTypes() lastCol = UBound(dataTypes) ' Get the last row and last column of the data lastRow = GetTableSize()(0) ' Loop through each string column For col = 1 To lastCol If dataTypes(col) = "String" Then ' Write header name to summary sheet headerName = ws.Cells(1, col).Value summaryWs.Cells(1, 1).Value = "Summary for String Columns" summaryWs.Cells(2, 1).Value = "String Column Name" summaryWs.Cells(2, 2).Value = "Unique Value" summaryWs.Cells(2, 3).Value = "Lower Bound" summaryWs.Cells(2, 4).Value = "Average" summaryWs.Cells(2, 5).Value = "Upper Bound" summaryWs.Cells(2, 6).Value = "Below Count" summaryWs.Cells(2, 7).Value = "Range Count" summaryWs.Cells(2, 8).Value = "Above Count" ' Get unique values and counts Set uniqueValues = New Collection For Each item In ws.Range(ws.Cells(2, col), ws.Cells(ws.Rows.count, col).End(xlUp)) If Not IsError(item.Value) Then On Error Resume Next uniqueValues.Add item.Value, CStr(item.Value) Debug.Print item.Value On Error GoTo 0 End If Next item ' Loop through unique values For Each item In uniqueValues ' Get average for the corresponding numeric column For numericCol = 1 To lastCol If dataTypes(numericCol) Like "Double*" Or dataTypes(numericCol) Like "Integer*" Or dataTypes(numericCol) Like "Long*" Then lowerBound = Application.WorksheetFunction.AverageIf(ws.Columns(numericCol), ws.Cells(ws.Rows.count, col), ws.Columns(numericCol)) * (1 - percentage) upperBound = Application.WorksheetFunction.AverageIf(ws.Columns(numericCol), ws.Cells(ws.Rows.count, col), ws.Columns(numericCol)) * (1 + percentage) summaryWs.Cells(summaryWs.Cells(summaryWs.Rows.count, 1).End(xlUp).row + 1, 1).Value = headerName summaryWs.Cells(summaryWs.Cells(summaryWs.Rows.count, 2).End(xlUp).row + 1, 2).Value = item summaryWs.Cells(summaryWs.Cells(summaryWs.Rows.count, 1).End(xlUp).row, 3).Value = lowerBound summaryWs.Cells(summaryWs.Cells(summaryWs.Rows.count, 1).End(xlUp).row, 4).Value = Application.WorksheetFunction.AverageIf(ws.Columns(numericCol), ws.Cells(ws.Rows.count, col), ws.Columns(numericCol)) summaryWs.Cells(summaryWs.Cells(summaryWs.Rows.count, 1).End(xlUp).row, 5).Value = upperBound belowCount = Application.WorksheetFunction.CountIfs(ws.Columns(numericCol), "<" & lowerBound, ws.Columns(col), item) summaryWs.Cells(summaryWs.Cells(summaryWs.Rows.count, 1).End(xlUp).row, 6).Value = belowCount rangeCount = Application.WorksheetFunction.CountIfs(ws.Columns(numericCol), ">" & lowerBound, ws.Columns(numericCol), "<" & upperBound, ws.Columns(col), item) summaryWs.Cells(summaryWs.Cells(summaryWs.Rows.count, 1).End(xlUp).row, 7).Value = rangeCount aboveCount = Application.WorksheetFunction.CountIfs(ws.Columns(numericCol), ">" & upperBound, ws.Columns(col), item) summaryWs.Cells(summaryWs.Cells(summaryWs.Rows.count, 1).End(xlUp).row, 8).Value = aboveCount End If Next numericCol Next item End If Next col 

♡♡⋆⁘⋄. ───∾⋆🎀🧸⋆∾─── .⋄⁘⋆♡♡ ♡ The Littles Cottage ♡
𝚊𝚋𝚘𝚞𝚝 𝚞𝚜
♡The Littles Cottage is an 18+ server for Littles and Caregivers! We are a welcoming , active , friendly community with a cozy cottage core vibe! We are fully LGBTQ+ Friendly!
𝚠𝚑𝚊𝚝 𝚠𝚎 𝚘𝚏𝚏𝚎𝚛
♡: Make new friends in our various SFW channels!
♡: Chats for everyone to mingle , Littles chats , and Caregivers Spaces!
♡: An active and growing community of members!
♡: A suggestions channels so you can help us improve our server!
♡: A wide variety of fun bot games and activities!
♡: Frequent engaging themed events!
♡: Many Boosting perks including: 50,000 mimu currency ,Nickname permissions, your own special color role , Pic/Gif perms in the whole server (not just set channels!) and A gold Star on the Star board!!
♡: Custom roles, colors, and server channels!
♡: Various VC channels!
♡: Well-moderated channels and active staff members to ensure a safe, fun time for everyone!
♡: Babysitting!!
♡: Mimu with a bunch of fun commands!
♡:Fun worksheets and coloring sheets in our school! ♡♡⋆⁘⋄. ───∾⋆🎀🧸⋆∾─── ⋆⁘⋄.♡♡
https://discord.gg/ddyMFAcPVk

I am pretty new to VBA, and I have forty separate spreadsheets with light exposure data (a new row every 15 seconds). I want to create a summary spreadsheet to populate with average values for red light (column D in source files), green light (column E), blue light (column F), infrared light (column G) and white light (column I) for the values in between the first movement and last movement of the day (movement is in column H) from each of the forty spreadsheets. There are multiple days of data on most of the spreadsheets.
I basically want column A to be the source file name so I can differentiate between different files, and column B to have the date on which the data was collected (dd/mm/yyyy), column C to have the time range on that day during which the data was collected (aka, the time of the first movement and the last movement in a range like hh:mm - hh:mm). Then for the other columns, I want it to be laid out as such: column D: red light average (inclusive of 0 values from the source sheet), column E: green light average (inclusive of 0 values from the source sheet), column F: blue light average (inclusive of 0 values from the source sheet), column G: infrared light average (inclusive of 0 values from the source sheet), column H: white light average (inclusive of 0 values from the source sheet), column I: red light average (exclusive of 0 values from the source sheet), column J: green light average (exclusive of 0 values from the source sheet), column K: blue light average (exclusive of 0 values from the source sheet), column L: infrared light average (exclusive of 0 values from the source sheet), column M: white light average (exclusive of 0 values from the source sheet).
I have been using Chat GPT to try to get the averages, but when I double check the output, it does not match the average value I get from the =AVERAGE( function in excel and I have no idea why. How can I get the averages to populate correctly? Currently trying to get the data ready for a meeting tomorrow, so any help would be greatly appreciated.
The code that I am working with is as follows:
`Sub ProcessWorksheets()
Dim folderPath As String
Dim summarySheet As Worksheet
Dim ws As Worksheet
Dim lastRow As Long
Dim startTime As Date, endTime As Date
Dim totalIncludingZero(1 To 5) As Double
Dim countIncludingZero(1 To 5) As Long
Dim totalExcludingZero(1 To 5) As Double
Dim countExcludingZero(1 To 5) As Long
Dim avgIncludingZero(1 To 5) As Double
Dim avgExcludingZero(1 To 5) As Double
Dim summaryRow As Long
Dim fileName As String
Dim i As Long, col As Long
Dim firstMovement As Long, lastMovement As Long
Dim checkTime As Date

' Set the folder path containing the worksheets to process
folderPath = "C:\Path\to\folder\with\raw\data\spreadsheets\"

' Set the summary sheet where averages will be stored
Set summarySheet = ThisWorkbook.Sheets("Sheet1")
summaryRow = 2 ' Starting row for summary data

' Add headers to the summary sheet
summarySheet.Cells(1, 1).Value = "Worksheet"
summarySheet.Cells(1, 2).Value = "Date"
summarySheet.Cells(1, 3).Value = "Time Range"
For col = 1 To 5
summarySheet.Cells(1, col + 3).Value = "Avg Light " & col & " (Inc 0)"
summarySheet.Cells(1, col + 8).Value = "Avg Light " & col & " (Exc 0)"
Next col

' Get the first file in the folder
fileName = Dir(folderPath & "*.csv")

' Loop through all files in the folder
Do While fileName <> ""
' Open the workbook
Set ws = Workbooks.Open(folderPath & fileName, Local:=True).Sheets(1)

' Find the last row with data
lastRow = ws.Cells(ws.Rows.Count, "B").End(xlUp).Row

' Loop through each day
i = 2 ' Start from second row
Do While i <= lastRow
' Find first movement of the day
firstMovement = 0
lastMovement = 0
Do While i <= lastRow And firstMovement = 0
If IsNumeric(ws.Cells(i, "H").Value) And ws.Cells(i, "H").Value > 0 Then
' Check for no movement for 5 minutes before
checkTime = ws.Cells(i, "B").Value - TimeSerial(0, 5, 0)
Dim j As Long
For j = i - 1 To 2 Step -1
If ws.Cells(j, "B").Value < checkTime Then
firstMovement = j + 1
Exit For
ElseIf IsNumeric(ws.Cells(j, "H").Value) And ws.Cells(j, "H").Value = 0 Then
Exit For
End If
Next j
End If
i = i + 1

' Additional check to prevent infinite loop
If i > lastRow Then Exit Do
Loop

If firstMovement > 0 Then
' Find last movement of the day
Do While i <= lastRow And lastMovement = 0
If IsNumeric(ws.Cells(i, "H").Value) And ws.Cells(i, "H").Value = 0 Then
' Check for no movement for 5 minutes after
checkTime = ws.Cells(i, "B").Value + TimeSerial(0, 5, 0)
Dim k As Long
For k = i + 1 To lastRow - 1
If ws.Cells(k, "B").Value > checkTime Then
lastMovement = k - 1
Exit For
ElseIf IsNumeric(ws.Cells(k, "H").Value) And ws.Cells(k, "H").Value > 0 Then
Exit For
End If
Next k
End If
i = i + 1

' Additional check to prevent infinite loop
If i > lastRow Then Exit Do
Loop
If lastMovement = 0 Then lastMovement = lastRow

' Calculate start and end times based on first and last movements
startTime = ws.Cells(firstMovement, "B").Value
endTime = ws.Cells(lastMovement, "B").Value

' Reset totals and counts for each day
For col = 1 To 5
totalIncludingZero(col) = 0
countIncludingZero(col) = 0
totalExcludingZero(col) = 0
countExcludingZero(col) = 0
Next col

' Loop through the data for the current day
For i = firstMovement To lastMovement
' Process the data for this time
For col = 1 To 5
If IsNumeric(ws.Cells(i, col + 3).Value) Then
Dim cellValue As Double
cellValue = ws.Cells(i, col + 3).Value
totalIncludingZero(col) = totalIncludingZero(col) + cellValue
countIncludingZero(col) = countIncludingZero(col) + 1
If cellValue <> 0 Then
totalExcludingZero(col) = totalExcludingZero(col) + cellValue
countExcludingZero(col) = countExcludingZero(col) + 1
End If
End If
Next col
Next i

' Calculate averages for each light type column for the current day
For col = 1 To 5
If countIncludingZero(col) > 0 Then
avgIncludingZero(col) = totalIncludingZero(col) / countIncludingZero(col)
Else
avgIncludingZero(col) = 0
End If

If countExcludingZero(col) > 0 Then
avgExcludingZero(col) = totalExcludingZero(col) / countExcludingZero(col)
Else
avgExcludingZero(col) = 0
End If
Next col

' Output the average values for the current day to the summary workbook
summarySheet.Cells(summaryRow, 1).Value = ws.Name
summarySheet.Cells(summaryRow, 2).Value = Format(startTime, "dd/mm/yyyy") ' Record the date
summarySheet.Cells(summaryRow, 3).Value = Format(startTime, "hh:mm") & " - " & Format(endTime, "hh:mm") ' Record the time range
For col = 1 To 5
summarySheet.Cells(summaryRow, col + 3).Value = avgIncludingZero(col)
summarySheet.Cells(summaryRow, col + 8).Value = avgExcludingZero(col)
Next col
summaryRow = summaryRow + 1
End If

' Reset loop variables for the next iteration
firstMovement = 0
lastMovement = 0
Loop

' Close the workbook without saving changes
ws.Parent.Close False

' Get the next file in the folder
fileName = Dir
Loop

MsgBox "Processing complete."
End Sub`

Hello,
I had this code that worked for a week and now it is not working correctly. I was using AI to help but now it's suggestions are just stupid. I am working in excel. These is the steps I'm doing and below this is the code that I piece together through AI and research. I'm getting two errors. The first error is name? when I first open the document. The second error, after clicking on the cell and hitting enter, is 1/00/1900 no matter what is in the actual boxes.
My Current Sheet is called “Test Claim”
E will contain the date of the most recent claim.
There is a sheet called “Test Page” and E will look at Test Page E.
F will determine if E updates, if E has a date in it. F has answers No, Yes, and Yes - OveRpmt.
B8 will contain the current claim date but will sometimes be empty.
F has a formula. F will not show a value until the Formula conditions have been met.
What I want E to do this first unless it already has a date in it’s cell. (I think this might be the issue after reviewing my steps?)
1. If E’s value is blank (Still has a formula in it), it looks at Test Page E.
a. If Test Page E is blank, E stays Blank.
b. If Test Page E has a date, E mirrors this date.
If E already has a date
2. E looks at F
a. If F says No, E keeps the date it has and does not update
b. If F says to “Yes” or “Yes – OveRpmt”, E looks at B8
c. E copies B8’s date.
d. E keeps B8’s date, even if B8 date is deleted.

Function CustomFormula(cell As Range) As Variant On Error GoTo ErrorHandler Dim wsClaim As Worksheet Dim wsTestPage As Worksheet Dim testPageE As Variant Dim fValue As String ' Set reference to the worksheet "Test Claim" Set wsClaim = ThisWorkbook.Sheets("Test Claim") ' Set reference to the worksheet "Test Page" Set wsTestPage = ThisWorkbook.Sheets("Test Page") ' Ensure both worksheets exist If wsClaim Is Nothing Or wsTestPage Is Nothing Then CustomFormula = CVErr(xlErrValue) Debug.Print "Error: Worksheet not found." Exit Function End If ' Get the value of Test Page E in the specified row testPageE = wsTestPage.Range("E" & cell.Row).Value ' Get the value of F in the specified row fValue = wsClaim.Range("F" & cell.Row).Value ' If E is blank If cell.Value = "" Then ' If Test Page E has a date, mirror it If Not IsEmpty(testPageE) Then CustomFormula = testPageE Else CustomFormula = "" ' If Test Page E is blank, E stays blank End If Else ' If E already has a date ' If F is "Yes" or "Yes - OveRpmt" If fValue = "Yes" Or fValue = "Yes - OveRpmt" Then ' Copy B8's date if it's not empty If wsClaim.Range("B8").Value <> "" Then CustomFormula = wsClaim.Range("B8").Value Else CustomFormula = cell.Value ' Keep the existing date if B8 is empty End If ElseIf fValue = "" Then ' If F is blank, make E blank CustomFormula = "" Else ' If F is "No", keep the current date CustomFormula = cell.Value End If End If Exit Function ErrorHandler: CustomFormula = CVErr(xlErrValue) Debug.Print "Error occurred in CustomFormula function: " & Err.Description End Function 

I'm trying to create a Macro to build a Data Base but im not achieving it, this is the Macro:
Sub GenerarBaseDatos()
Dim wb As Workbook
Dim wsDestino As Worksheet
Dim wsOrigen As Worksheet
Dim lastRow As Long
Dim i As Long
Dim filaDestino As Long
Dim linea As String
Dim datos() As String
Dim booking As String
Dim pax As String
Dim leadName As String
Dim arrival As String
Dim dur As String
Dim outDate As String
Dim amount As String
Dim ebilling As String
Dim j As Long
Set wb = ThisWorkbook
Set wsOrigen = wb.Sheets("Hoja1")
On Error Resume Next
Set wsDestino = wb.Sheets("Pago")
On Error GoTo 0
If wsDestino Is Nothing Then
Set wsDestino = wb.Sheets.Add(After:=wb.Sheets(wb.Sheets.Count))
wsDestino.Name = "Pago"
Else
wsDestino.Rows("2:" & wsDestino.Rows.Count).Clear
End If
With wsDestino
.Cells(1, 1).Value = "Booking"
.Cells(1, 2).Value = "Pax Inv/Conf"
.Cells(1, 3).Value = "Lead name"
.Cells(1, 4).Value = "Arrival"
.Cells(1, 5).Value = "Dur"
.Cells(1, 6).Value = "Out Date"
.Cells(1, 7).Value = "Amount"
.Cells(1, 8).Value = "Ebilling"
End With
filaDestino = 2
lastRow = wsOrigen.Cells(wsOrigen.Rows.Count, 1).End(xlUp).row
For i = 1 To lastRow
linea = wsOrigen.Cells(i, 1).Value
If InStr(1, linea, "Booking", vbTextCompare) > 0 Then
' Extraer el número de booking
datos = Split(Trim(linea), " ")
If UBound(datos) >= 1 Then
booking = Trim(datos(1))
End If
linea = Trim(wsOrigen.Cells(i + 1, 1).Value)
datos = Split(linea, " ")
If UBound(datos) >= 1 Then
pax = Trim(datos(0))
End If
leadName = ""
For j = 2 To UBound(datos) - 5
leadName = leadName & " " & Trim(datos(j))
Next j
leadName = Trim(leadName)
If UBound(datos) >= 4 Then
arrival = Trim(datos(UBound(datos) - 4))
dur = Trim(datos(UBound(datos) - 3))
outDate = Trim(datos(UBound(datos) - 2))
amount = Trim(datos(UBound(datos)))
End If
linea = Trim(wsOrigen.Cells(i + 3, 1).Value)
datos = Split(linea, ":")
If UBound(datos) >= 1 Then
ebilling = Trim(datos(1))
End If
With wsDestino
.Cells(filaDestino, 1).Value = booking
.Cells(filaDestino, 2).Value = pax
.Cells(filaDestino, 3).Value = leadName
.Cells(filaDestino, 4).Value = arrival
.Cells(filaDestino, 5).Value = dur
.Cells(filaDestino, 6).Value = outDate
.Cells(filaDestino, 7).Value = amount
.Cells(filaDestino, 8).Value = ebilling
End With
filaDestino = filaDestino + 1
End If
Next i
I need a Data Base example:
Booking Pax Inv/Conf Lead name Arrival Dur Out Date Amount Ebilling
12345 2 Mr Wael 20-apr-24 3 23-apr-24 1000 456666
67890 4 Mr Paul 19-apr-24 7 26-apr-24 2000 7777777
That comes out from a txt like this:
Supplier XXXXXXX
Statement 0243
Status PO
Date payment 09-MAY-2024
Amount XXXXXXXX
Amount paid XXXXXXXX
Date entry 09-MAY-2024
User ID XXXXXX
Booking Pax Inv/Conf Lead name Arrival Dur Out date Amount
12345 2 MR WAEL 20-APR-24 3 23-APR-24 1000.00
PAID AS PER INVOICE
Ebilling : 4566666
67890 4 MR PAUL 19-APR-24 7 26-APR-24 2000.00
PAID AS PER INVOICE
Ebilling : 777777777
Thanks in advance

I'll start off by saying I don't want to sit here and write a post of another failed set of parents, but, alas, I have nobody else I can speak to about this that would really understand. I've found therapists do be rather unhelpful and I truly have trust issues with people. I've kept a lot of this inside for my life and at this point I think I just need to somehow let it out instead of punching holes in walls or screaming in anger randomly. Maybe writing it here would help me sleep a full night or be a little happier in life?
Either way, I would genuinely appreciate hearing your take on this for those who have experienced a similar past. I'm not looking for sympathy, but a possible path that I can take in getting rid of this hate I have inside of me for good.
​
​
By the age of 13 I had already been living with different friends for months and months with no idea where or what my mother was doing. I went to school but only when I wanted to, otherwise I would wander around and skateboard on the streets until it was time to go 'home'. She would randomly show up in her beat up 80s Honda accord with everything she owned in the backseat to see me once in a BLUE moon. Never once did she speak with my friends parents or caretakers about me, just assumed I would worm my way into another family and their life and become another mouth to feed with no explanation. As a kid you don't really see it from an adults perspective, but as an adult you know there's a failed adult behind this child in your home.
I knew the situation wasn't ideal, but I was living with my best friend at the time for a while as a kid. Every night was video games with your best bud, how bad can life be?
My mother was 17 when she had me, and 16 when she had my brother both with the same guy. I never knew my brother, he was given away because either she was too young or she didn't want him. I spoke with him a few times on social media, but nothing more. I don't use any social media so any contact I did have is gone. He didn't know I existed until I had reached out and has never spoken with our blood parents.
Super mommy did it all. Drank whatever and whenever she could, frequently used drugs (even sold them to my friends who were in middle school for a couple of bucks), fist fought anyone that upset her (including men and myself at a certain age) and was always the victim in these scenarios. She hadn't been this way for as long as I knew her, but majority of the time it was. She had a temper like no other and felt like it was "her" superpower. When it reality it's just a weakness that everyone gets to experience firsthand, either verbally or physically depending on the day. "You can fuck with mean, but you can't fuck with crazy!" she'd say, moments before road raging with a stranger at midnight in the middle of nowhere.
When my 'step' father (the man who raised me most of my life and I love with everything I have) had heard of my situation living abroad, he didn't hesitate to pick me up and take me to a better place in an entirely different part of the country. He and my mother didn't see eye to eye on much after I was about 4 years old, but he always stuck around in the same town we lived in to be around me. Eventually he went back to his hometown when she severed communication between he and I. Only through the grapevine did he hear about me and what I was doing. A few days later he had driven across the US day and night to pick me up, give that family money, thanked them and took me away.
The last time I spoke with my mother was when she took me out for some new shoes for my 14th birthday making promises left and right, while again sitting in her car with everything she had in the backseat. It was just another day with this human who couldn't help but do drugs and lie to me. I already knew I wouldn't be here in a few days and when she came back to see me, I was gone.
I lived in this new home and it actually felt like one with my Dad (step dad but he was my DAD). A few years of having a HOME was surreal and I think I took it for granted, because that too came to an end. I was just starting college and that's when parent #2 came into my life.
Meet Bio-dad! He was once only a few blurry pictures from many years past and tales from my shaman mother. Naturally I was always curious about him, and one day we were in contact with one another. Somehow he managed to find me, even though he had been paying child support for most of my life. He flew out to meet me, and a few months later I somehow decided moving across the country to live with him was a swell idea.
I thought this might have been it, finally, the blood I thought I always wanted in my life. But just a few months in I realized he was no better than her. He was successful and worked hard, but that doesn't mean he's a good person let alone a father. I never called him Dad or Father purely because I was a young adult now and didn't need another figure like that in my life, let alone from someone I barely knew. He was on marriage 2 or 3 with step kids and I just felt like I was 13 years old again in another strange house. I was told he spent a long time trying to find me when he was paying child support but was never able to. I believed him at first, and sometime later many divorced fathers told me that probably isn't be true.
It felt like he was constantly angry or upset at something. His wife, the kids, the dogs, the pool, whatever he was annoyed with everyone else was obligated to agree or veer away. He often found ways to make himself out to be the hardest worker and nothing matters but how many hours you clock in your worksheet. He "wished he could work 40 hours a week". After a few months of everyone arguing, yelling and finger pointing over little nothings each day, I decided I didn't need this kind of stress in my life and left to live in my small truck for a few weeks until I found a room to rent on my own and start my adult life.
Over the years he's tried to stay in contact with me but I never really gave much back to him if at all. I have no interest in knowing him, but his insistent attempts to contact me with 'family is important' yada yada makes my blood boil. I have no blood family as far as I care to know. I'm on the latter half of this life and I simply don't see the point in trying to establish these relationships because we have the same grandparents or blood. Why would I EVER try to put myself into that situation again? For family? Something I really don't value or care about?
The last couple of years I went from never thinking about these humans to frequently finding myself shaking from anger and distracted in life from what I want to actually do and accomplish. I feel like I'm stuck on this chapter and I really, really need to move on from it. I thought just ignoring it would work, but alas as time goes on I get random phone calls and texts from people I used to know trying to get in contact with me. I know who they are, and I know who they're speaking for, but I don't ever give them the satisfaction of even responding.
So here I am, wondering what I should do. Do I call both of them (keep in mind I don't think they've spoken since the early 90s) and let each person individually know that I'd rather watch them suffer in life than to spend time with them? I don't even want them to know where I am, what I'm doing or what I sound like. Do I write them an email, pray they know what that even is and hope they understand I don't care for them?
I considered getting hypnotized so I can fully forget them. As ridiculous as that sounds I often wonder if I could completely remove them from my memory, would I be a better person? Would I finally feel this tension in my chest leave? Would I stop screaming internally when I'm alone out of anger towards them?
At this point in my life I just want to be happy with what I have and leave them in an old time capsule never to be opened again. As I get older the more I understand that childhood tremendously dictates who we are, and I'm learning that I don't really like who I am in some aspects, and I blame them for that. Whatever good and success I have in life is because of my 'step' Dad and how he raised me the best he could.
I don't know that I could be calm or mature enough to clearly state how I feel without emotions coming into the mix. Every time I imagine talking to them it quickly turns into a rage that takes a while to let go of.
If you read my rant, thank you. If you didn't, I don't blame you one bit.
tl;dr I need to completely remove my parents from my life so I can move on, and I'm not sure how to go about it.
​

Hey all! My son is going into 1st grade and I've really been strongly feeling led to homeschool him. I think this is the right choice but all my friends and family, except for my mom and husband, feel like he needs to be in public school because of his mental health issues. He is diagnosed with ODD and ADHD and we suspect he has autism as well but the waitlist is months out so we don't know for sure yet. I'm also struggling because I was homeschooled and absolutely hated it.
We tried to go the public school route but he did not get accepted to either of our top two choices and I just have such a bad feeling about it every time we tried to enroll him anyway. I truly think this is what I'm supposed to be doing but I'm super worried that I'm going to mess him up or do something wrong. He graduated Kindergarten through a 2 day a week program and he can read and spell and do math super well so I'm not worried about that. But he is an only child and I'm scared I'm going to isolate him. We are signed up for a co-op that's once a week for science and history and other electives but is that enough? I went to a similar co-op but I also had siblings so I'm not sure if that makes a big difference.
He's also a kinesthetic learner and he HATESSSS worksheets more than anything but he loves to learn through play and with his hands. That is not my style of learning so am I even qualified to teach him?? I've been looking at curriculums and decided on All About Reading & Spelling and Horizons Math. But what if he hates them? We don't have a ton of money so once I buy a curriculum we kinda have to stick with it for the whole year because I can't afford more than one right now.
Sorry if I'm ranting, I'm just really nervous that everyone else is right and my gut is wrong and I'm going to mess him up somehow. I want what's best for him but almost no one believes that I can do this. Again, I know his grades in 1st grade don't really matter in the long run and he's very smart but I don't want to ruin him socially. 1st grade is important for learning how to make friends and he already has issues with that and I don't want to make it worse, especially with him being an only child. He went to the 2 day a week program for the entire school year and he didn't really make a single friend because he's so different than the other kids. Maybe he does need a whole 5 day school setting to make friends. Maybe cutting it down to only 1 day a week is the wrong thing to do. I don't know. I just want to do what's best and I feel like I'm in way over my head. Will homeschooling mess him up??

Hello fellows,
I have coded the VBA function, but it keeps giving the #NAME? error, although I checked the sheet names and cell formats, everything is okay. Couldn't find any typos either. I am not sure where the reference is wrong. Can you please help solve this issue? Thank you!
The context:
There are multiple excel sheets with different values. Each sheet has a row (16) with dates and column (B) with string items. On the separate sheet, "Sheet1", I need to summarise the values from all other sheets that match the particular date and item from Sheet1. For example: if I type function in the cell at intersection of item "Sales" and date "01.01.2024", the outcome will be the sum of all the sales on this date from multiple sheets, inluding newly added sheets. Note: If one of the projects is altered and the value is moved to different cell, the summary automatically updates, without attaching it to the cell value but rather to the cell location.
The code:

Function SumSheets(item As String, targetDate As Date) As Double Dim ws As Worksheet Dim dateCell As Range Dim itemCell As Range Dim total As Double Dim dateCol As Long Dim itemRow As Long Dim addvalue As Double total = 0 ' Loop through each worksheet For Each ws In ThisWorkbook.Worksheets ' Check if the worksheet is not the summary sheet and is visible If ws.Name <> "Sheet1" And ws.Visible = xlSheetVisible Then ' Find the target date in row 16 Set dateCell = ws.Rows(16).Find(What:=targetDate, LookIn:=xlValues, LookAt:=xlWhole) ' If target date is found, get its column If Not dateCell Is Nothing Then dateCol = dateCell.Column ' Find the item in column B Set itemCell = ws.Columns(2).Find(What:=item, LookIn:=xlValues, LookAt:=xlWhole) ' If item is found, get its row If Not itemCell Is Nothing Then itemRow = itemCell.Row ' Get the value at the intersection of item and date addvalue = ws.Cells(itemRow, dateCol).Value ' Check if the value is numeric If IsNumeric(addvalue) Then ' Add the value to the total total = total + addvalue Else ' Handle non-numeric value Debug.Print ("Non-numeric value found at intersection of " & item & " and " & targetDate & " in worksheet " & ws.Name) End If Else ' Handle item not found Debug.Print ("Item " & item & " not found in worksheet " & ws.Name) End If Else ' Handle target date not found Debug.Print ("Target date " & targetDate & " not found in row 16 of worksheet " & ws.Name) End If End If Next ws Exit For SumSheets = total End Function 

I have the typical just can’t focus on schoolwork until the final hours before where panic forces me to complete assignments but it just isn’t working anymore. I used to study for a test or work on a project due at 8am only the night before, but that ended up turning into getting up at 2:30am the day of and by now it just doesn’t work and I just hand in things late and just lie my way out of it if possible like forgetting a minor step for submissions or tech issues etc.
The assignment is in my head constantly the entire time though. If I set aside time to do it and then procrastinate with League of Legends or something then I think about the looming threat of the project and can’t even really focus on or accomplish much in the match. I split up my day constantly by how much available time I have and how much time I expect the parts of the assignment to take, so every time that I fall asleep on the train or spend time eating or am just behind pace because I didn’t write the Introduction in 20 minutes or something, I consider it a time loss and then just freak out and give up or rush the rest of it with a new estimate which makes breaking it up into smaller chunks just more difficult. I also just have issues doing small assignments or doing the tiny steps like taking a picture of and uploading a worksheet that I already did because I think of how much more there is to do.
My grades are still good but they could be better so easily and it is just not sustainable at all since my hair is shedding a lot and I look like I have not seen the sun in weeks, ongoing 1-2yr. ADHD and like OCD is in the family if that matters

Pretty cringe ik, but here is my advice on how to approach Math 1131 if you have only done standard maths in the HSC. I did standard maths and managed to get 80+, however there were many times before starting the course and during the course where I felt like dropping it and not pursuing my degree in comp sci and to just do commerce. I think a lot of people would be in a similar boat to me, as UNSW makes it clear that standard maths students won't be able to do the course unless they complete a year's worth of bridging courses. Well, this is simply not true and if this course has made you consider re-evaluating what you want to pursue, don't feel like an idiot because that was me too. (So don't flame me as a sweat, just trying to encourage someone who was in my position)
If you are an incoming student and haven't done any preparation, I'd consider doing it in the term following as this will give you enough time to prepare on the side (or use the summer holidays like I did). Alternatively, you could just be an animal and rawdog it.
To prepare, here is what I did and what I'd do again. Go on Khan Academy and create an account to track your progress. If you are anything like me, I didn't know what a quadratic was or how to properly factorize, so I'd recommend completing the following 'courses' in this order.

• Algebra 1/2
• Trigonometry (even though you did this in standard maths - it is not enough of a baseline)
• Precalculus (Units 1,2,3,6,7)
• College AP/BC Calculus

You don't have to do them all to 100% proficiency every single time, but this will get you to the baseline of an advanced math student within 100 hours maximum. I'd take notes while watching all the tutorials etc, even though I didn't refer to them much, it was great in consolidating my understanding.
https://www.khanacademy.org/
The second thing I'd do is leading up to the course is to complete these revision sheets set out by UNSW. Now, don't get wigged out if you can't do them first try, I couldn't either. You've just learned this content.
https://www.unsw.edu.au/science/our-schools/maths/student-life-resources/student-services/mathematics-drop-in-centre/revision-worksheets
Now, onto the actual course itself, you will get the course material about a week before, don't get wigged out by the course pack - it seems like a lot but its not as bad as you think.
To understand the content here's what I'd do (and did do).

• Only watch Milhan Pahors lecture stream.
  • I didn't watch a single other lecture apart from this - they are online and are brilliant. He works through the problems, shows you where the traps are and how to approach them.
  • Also don't feel stupid for rewatching parts of the lecture either - nobody gets it first go.
• Go to the maths drop in center once a week.
  • They are both online and in person & are great for asking questions / reinforcing your knowledge.
• Chatgpt 4o just came out.
  • It's ability to solve maths problems is fantastic and can solve probably about 80-90% of course material. Use this to obtain worked solutions to problems since they don't give you worked solutions and also use it as a private tutor.

Finally, here's how to actually pass the course and even do well in it. The course is lobsided, you want to get a pre-exam mark 45+/50 because the final is near impossible to do. 40/50 is in line with a pass (for extension/advanced math students who didn't initially take the course seriously and can clutch it in the final - not you) so you want to score near perfect on everything.
Mobius:
These are weekly quizzes that are approximately 10%, you are able to check your answers before submitting with a week long time limit. You can easily get 100% on this.
Lab Test 1:
This is a lab test where you will get the practice questions that will be exactly the same. They just change the numbers around. So you can practice until you are basically automatic.
One thing to note - for this lab test you will only get access to a Kcalc, which is a terrible calculator and I'd go into a labroom maybe when you are in uni before the exam and try it out. You'll basically do this test completely manually/ in your head (so take that into consideration & don't get caught lacking as a lot of people underperform in this lab ). You want to aim for full marks and its not hard to do, you just memorise how to do it.
For lab test 1/2 - UNSW mathsoc discord posts worked solutions a week prior aswell & their page gives previous years worked solutions if you want a head start.
https://www.unswmathsoc.org/resources/exam-bank
Lab Test 2:
This lab test uses maple, which is great for us because it does the manual computations/calculations for us. Once again, find the worked solutions, make a cheat sheet and memorise the lab test answers. Worth 15%.
Assignment:
This is worth 10%, about 2% comes from answering questions on the mobius which you can review to see if you are correct (so its guaranteed). Then you are to write a paper on proving those answers. It's broken up into two parts, algebra and calculus. It turns out for the Algebra section they recycle the same questions every year, so go onto studocu and just get an exemplar response. For this aswell, make sure you do all the formatting correctly.
https://www.studocu.com/en-au/course/university-of-new-south-wales/mathematics-1a/1537137?origin=document-viewer
Final Exam:
If you type in Math1131 on this subreddit, you'll quickly be able to tell this exam is pretty challenging. The sheer amount of complaining about this exam has made it become somewhat of a meme - kinda why I'm hoping this post doesn't get torn to shreds.

• The Final exam is 60% seen questions from a 200 question exam bank (they only select about 8 questions). So it is a ton of questions to get ur head around and then try memorise.
  • These questions are also really difficult - which is why a lot of people absolutely wig their shit before the final. It is a huge jump from the labs so I'd get onto them as early as possible.
• They give you worked solutions via video sessions (approximately 15-25 hours of worked solutions).

So, you have to hedge your bets, what I did was make a document where I screenshotted solutions, or made a cheat sheet on how to do them. This took me a fucking minute and I didn't do all the questions - only the ones where I could actually replicate it in an exam. Once you've done that, just repeatedly do the past papers.
If you do all this - you should get somewhere between 10-25/60, I reckon. Since you've actually watched a lot of the practice questions - you'll find the unseen questions are somewhat similar and you can do parts of them.
So to recap - don't be discouraged by this propaganda set out by the engineering/maths/comp sci departments about the course. If you are anything like me, chances are you've done well to get to a position to do your course and know how to work systematically. If you do this, you not only can pass, but actually do well.
Once you get over this hurdle, all other maths at uni will be the same difficulty to you as it is to your peers. You'll have to spend a lot of time on this subject, but I still went partying during the term etc - wasn't just some incel. So, hopefully this will encourage you to give it a red hot crack.

Hi,
Im new to all this so go easy and ill try my best to keep it simple but dont think there is an overly concise way to summarise this. Im trying to produce a workbook which serves as a one stop shop for our orders recieved and dispatching side of the business whilst trying not to change too much aesthetically on the surface so the transition is smooth and embraced as currently there is duplication for this in 4 separate places as well as a POS portal, which as you can imagine is leading to a large amount of human error and poor productivity.
I wish to have two control documents (probably can be one if im honest) which is a list of our customers as a master list, then a list of the product lines which pack size and qty etc per customer depedant on which ones are applicable to them.
I wish to use the latter template as the daily order sheet which means i duplicate it for each day (sheets to be named by date ie. 010624). I then want to be able to pull that sheet through to a 'Load Sheet' where it removes all the lines where there is a qty of 0 so we can see how many orders we have got, how many pallets it equates to etc. Id like to be able to do this through a drop down list (which is auto populated by the sheet names as and when they are added)
Any help on the set up would be greatly appreciated :)
As mentioned, i then want to choose a named worksheet from a drop down list on the Load Plan sheet which will pull that sheets data through and filter out lines with 0 qty and then allow me to assign load numbers in a Load Number column to then slice view on the despatch page to assign pallet numbers etc. This is where im pretty fixed in method otherwise too much change, old dogs new tricks etc etc .
Thanks in advance

I would like to run VBA and adjust cell protection to locked for all cells across my 5 worksheets. Then lock the sheets.
——— Dim exsheet1 as Worksheet
Set exsheet1 = worksheets(“exsheet1”) Exsheet1.Range(“A1:ZZ5000”).Locked = true Exsheet1.protect Password:= “password1” ——-
The above code works for that sheet but i need this to go on to the other sheets in the workbook

Hi,
I inherit an excel with macro, which has 3 steps: 1. using jira cloud add-in to pull a list of defects into tab called "defects" 2. macro then read the data, do some transformation, once it's done, copy paste & append to another tab called "history" 3. a pivot table pull data from "history" tab, and some chart also pull data from "history" tab dynamically. I supposed to open this excel every Monday, essentially it pull defects from jira server every Monday, then I review pivot and chart.
the problem is recently our IT disable the "jira cloud" add-in, so excel is not able to pull defects. I have to download from jira manually, which is not a big deal. I just download and paste to "defects" tab, which have 12 columns, and # of rows may change week by week (some week is 20, some week is 85). However it break the macro, and debug show it points to this line Set TblDefect = Worksheets("defects").ListObjects("TblDefects")
I don't have much knowledge on macro. I am curious if there is bandit to fix it, either program way or manual way? for example, is there a way I could turn this 20*12 cells into this TblDefects so it will get going?
Thanks a ton!

♡♡⋆⁘⋄. ───∾⋆🎀🧸⋆∾─── .⋄⁘⋆♡♡ ♡ The Littles Cottage ♡
𝚊𝚋𝚘𝚞𝚝 𝚞𝚜
♡The Littles Cottage is an 18+ server for Littles and Caregivers! We are a welcoming , active , friendly community with a cozy cottage core vibe! We are fully LGBTQ+ Friendly!
𝚠𝚑𝚊𝚝 𝚠𝚎 𝚘𝚏𝚏𝚎𝚛
♡: Make new friends in our various SFW channels!
♡: Chats for everyone to mingle , Littles chats , and Caregivers Spaces!
♡: An active and growing community of members!
♡: A suggestions channels so you can help us improve our server!
♡: A wide variety of fun bot games and activities!
♡: Frequent engaging themed events!
♡: Many Boosting perks including: 50,000 mimu currency ,Nickname permissions, your own special color role , Pic/Gif perms in the whole server (not just set channels!) and A gold Star on the Star board!!
♡: Custom roles, colors, and server channels!
♡: Various VC channels!
♡: Well-moderated channels and active staff members to ensure a safe, fun time for everyone!
♡: Babysitting!!
♡: Mimu with a bunch of fun commands!
♡:Fun worksheets and coloring sheets in our school! ♡♡⋆⁘⋄. ───∾⋆🎀🧸⋆∾─── ⋆⁘⋄.♡♡
https://discord.gg/ddyMFAcPVk

Streamlining Email Communications via Excel

Excel is not just a tool for managing data; it's a powerhouse for automating repetitive tasks, including sending emails. The capability to dispatch a worksheet as an attachment directly from an Excel workbook to a list of specified email addresses represents a significant efficiency boost for many professionals. This process not only saves valuable time but also reduces the margin for error in manual data entry or the process of attaching files. By leveraging Excel's built-in features or scripting capabilities, users can transform their workflow, turning intricate, time-consuming tasks into a seamless, automated process.
The importance of this functionality extends across various industries, from marketing to finance, where regular communication with stakeholders is pivotal. By automating the process of sending worksheets as email attachments, businesses can ensure timely updates are provided to clients, team members, or stakeholders with minimal effort. This introduction to automating email attachments through Excel will explore the essential steps, tools, and scripts necessary to implement this solution, making your Excel workbook an even more powerful asset in your professional toolkit.

Command	Description
Workbook.SendMail	Sends the workbook as an email attachment using Excel's built-in email functionality.
CreateObject("Outlook.Application")	Creates an Outlook Application object for email automation from Excel using VBA.
.Add	Adds a new email item to the Outlook Application object.
.Recipients.Add	Adds a recipient to the email item. Can be called multiple times to add multiple recipients.
.Subject	Sets the subject line of the email.
.Attachments.Add	Attaches a file to the email. The file path must be specified.
.Send	Sends the email.

Enhancing Workflow Efficiency with Excel Email Automation

Automating the process of sending emails from Excel not only streamlines a crucial communication channel but also introduces a higher level of efficiency and accuracy in the dissemination of information. This capability is particularly beneficial for businesses and professionals who regularly distribute reports, newsletters, or updates to a wide audience. The automation process can be customized to send emails at scheduled intervals, ensuring timely updates without the need for manual intervention. Furthermore, by integrating Excel with email, users can leverage the robust data processing and analysis capabilities of Excel, enabling them to send personalized and data-driven communications. This approach enhances the relevance and impact of the messages sent, as recipients receive information that is tailored to their needs or interests.
The technical foundation for automating email dispatch through Excel involves using Visual Basic for Applications (VBA) to script the email sending process. VBA allows for the creation of macros within Excel that can interact with email clients, like Microsoft Outlook, to automate the process of composing and sending emails. This includes dynamically adding recipients, subject lines, and attachments based on the content within the Excel workbook. Such automation not only reduces the time spent on repetitive tasks but also minimizes the potential for errors associated with manual email composition. As businesses continue to look for ways to optimize operations and improve communication efficiency, the integration of Excel's data management capabilities with email automation stands out as a powerful tool for achieving these objectives.

Automating Email Dispatch with Excel VBA

VBA in Microsoft Excel

Dim outlookApp As Object Set outlookApp = CreateObject("Outlook.Application") Dim mailItem As Object Set mailItem = outlookApp.CreateItem(0) With mailItem .To = "example@example.com" .CC = "cc@example.com" .BCC = "bcc@example.com" .Subject = "Monthly Report" .Body = "Please find the attached report." .Attachments.Add "C:\Path\To\Your\Workbook.xlsx" .Send End With Set mailItem = Nothing Set outlookApp = Nothing 

Expanding Automation Horizons with Excel

Excel's capability to automate email sending tasks opens a new realm of efficiency for professionals across all sectors. This feature is not just about saving time; it's about enhancing the precision and personalization of communication. The integration of Excel with email clients, particularly through VBA, enables the automated sending of tailored messages and documents. This automation is pivotal for finance professionals, marketers, and project managers who regularly share updates, reports, and newsletters with stakeholders. The ability to dynamically attach Excel sheets as email attachments ensures that the latest data can be shared instantly, reducing the lag between data analysis and decision-making.
Beyond the immediate productivity gains, automating emails from Excel facilitates a more strategic approach to communication. Users can segment their audience within their Excel database, allowing for more targeted email campaigns. This level of customization ensures that recipients receive relevant information, increasing engagement and response rates. Moreover, the automation process can be fine-tuned to include conditional formatting rules, ensuring that emails are sent only when specific criteria are met, further enhancing the relevance and timeliness of the communication. As businesses evolve in an increasingly data-driven world, the ability to seamlessly merge data analysis with communication tools like email will become a cornerstone of efficient and effective operations.

Frequently Asked Questions About Excel Email Automation

1. Question: Can Excel send emails automatically?
2. Answer: Yes, Excel can send emails automatically using VBA scripts to interact with email clients like Microsoft Outlook.
3. Question: Do I need Outlook installed to send emails from Excel?
4. Answer: Yes, for the VBA approach, Microsoft Outlook needs to be installed and configured on your computer.
5. Question: Can Excel send an email to multiple recipients at once?
6. Answer: Yes, Excel can send emails to multiple recipients by adding them in the VBA script either directly or by referencing cells containing email addresses.
7. Question: How can I schedule emails to be sent from Excel?
8. Answer: While Excel itself doesn't have a built-in scheduler for emails, you can use Task Scheduler with a VBA script or third-party tools to automate the timing of your emails.
9. Question: Can I personalize the email content for each recipient?
10. Answer: Yes, by using VBA, you can customize the email content for each recipient based on the data stored in Excel.
11. Question: Is it possible to attach multiple files to an email from Excel?
12. Answer: Yes, the VBA script can be modified to attach multiple files by specifying the path of each file you wish to attach.
13. Question: Can I send emails from Excel without using VBA?
14. Answer: Yes, you can use Excel's built-in "Send as Attachment" feature, but this method does not allow for automation or customization.
15. Question: Are there any limitations to sending emails from Excel?
16. Answer: The primary limitation is the necessity of having an email client like Outlook installed, and potential security settings that may restrict automated emails.
17. Question: How can I ensure my automated emails don't end up in the spam folder?
18. Answer: Ensure your email content is clear, concise, and free of spam triggers. Additionally, having recipients add your email address to their trusted list can help.

Wrapping Up Excel's Email Automation Capabilities

The journey through Excel's email automation capabilities reveals a transformative approach to professional communication and data management. By leveraging VBA scripts, users unlock a powerful synergy between Excel's data analysis strengths and the efficiency of direct email communication. This not only streamlines the process of sharing vital information but also personalizes the way businesses interact with their stakeholders. From finance to marketing, the ability to automate email dispatches based on dynamic Excel datasets is a game-changer, ensuring that relevant, up-to-date information reaches the right audience at the right time. As we delve deeper into an era where efficiency and precision are paramount, Excel’s email automation stands out as a critical tool for professionals looking to optimize their workflows, enhance communication strategies, and drive decision-making processes with timely, data-informed insights.
https://www.tempmail.us.com/en/excel/automating-email-attachments-with-excel-workbooks

The War Scroll, also known as the "War of the Sons of Light Against the Sons of Darkness," is a unique text within the Dead Sea Scrolls that portrays an apocalyptic battle between the forces of good (Sons of Light) and evil (Sons of Darkness). This scroll provides insight into both historical and symbolic elements.
Historical Accuracy:
The War Scroll, while containing detailed military tactics and an epic narrative of the ultimate confrontation, doesn't explicitly reference any specific historical event or timeframe. Some scholars believe it could be a product of the community's anticipation of a future messianic conflict or a reflection of their own community's struggles against opposing forces during their time. Interpreting the historical accuracy of the scroll often involves exploring the context of the Qumran community and the turbulent times in which they lived.
Symbolism and Esoteric Wisdom:
The War Scroll goes beyond a mere description of a physical battle. It portrays a cosmic conflict between the forces of light and darkness, reflecting not just a literal warfare but also a symbolic and spiritual struggle. The text emphasizes righteousness, divine intervention, and the victory of good over evil.
Within the study guide, activities and exercises could involve dissecting the symbolic elements present in the War Scroll, exploring the deeper meanings behind the battle tactics and the metaphysical implications of the conflict. Understanding the symbolism could involve group discussions, comparative analysis with other ancient texts with similar themes, and exploring the impact of this symbolic representation on the community's beliefs and practices.
Here are a few activities and exercises to explore the symbolism and historical context of the War Scroll from the Dead Sea Scrolls:

1. Symbolism Analysis:

Provide excerpts from the War Scroll and encourage participants to identify and discuss the symbolic meanings behind elements like the "Sons of Light" and the "Sons of Darkness," various weapons, and the strategies outlined for battle. Group discussions or written reflections can help participants explore the deeper layers of meaning.

1. Comparative Analysis:

Compare the War Scroll's themes with similar apocalyptic or eschatological texts from different cultures or religions, such as apocalyptic passages in the Book of Revelation in the Christian Bible or apocalyptic texts from other ancient traditions. Create worksheets or discussion prompts to highlight similarities and differences in themes, symbols, and beliefs about cosmic battles.

1. Historical Context Exploration:

Present historical information about the era when the Dead Sea Scrolls were written. Discuss the political, social, and religious climate of that time, including the turmoil in the region, to understand how these factors might have influenced the composition of the War Scroll. Encourage participants to consider the possible motivations behind the text's creation.

1. Creative Interpretation:

Encourage creative expression by asking participants to create artwork, poems, or short stories inspired by the themes and imagery found in the War Scroll. This exercise allows individuals to engage more deeply with the symbolic elements and interpret them in their own unique ways.

1. Role-playing or Debates:
   Organize a role-playing activity where participants take on the roles of "Sons of Light" and "Sons of Darkness," debating their ideologies, motivations, and strategies for the ultimate battle. This exercise helps in understanding differing perspectives and interpreting the conflicts presented in the scroll.
   

Interpretative variations regarding the river's crossing in different ancient texts reflect the unique religious, philosophical, and cultural perspectives embedded within these narratives. These differences in interpretation offer insights into diverse worldviews and varying theological frameworks present in ancient texts:

1. Mesopotamian Context:

• In Mesopotamian mythology and literature, the Euphrates River often held symbolic significance as a boundary between the known civilized world and the wild, unknown realms. The crossing of the Euphrates could symbolize journeys into unexplored territories or transitions between order and chaos. This perspective reflects a worldview rooted in the physical and geographical division of lands.

1. Biblical Context:

• In biblical texts, such as those in the Book of Revelation or Old Testament prophecies, the crossing of the Euphrates carries eschatological significance. It may represent a divine intervention or a decisive moment in God's plan, marking the commencement of apocalyptic events. This interpretation aligns with the biblical narrative of divine judgment and the unfolding of God's ultimate purpose in history.

1. Gnostic or Apocryphal Context:

• Gnostic or apocryphal texts often interpret the river's crossing as a symbolic liberation or awakening. It might signify the release of spiritual forces or the ascent to higher consciousness, reflecting a philosophical perspective emphasizing spiritual enlightenment and liberation from material constraints.

1. Greco-Roman Interpretation:

• In Greco-Roman literature, crossings of rivers were often associated with mythological journeys or transitions between realms. The crossing of the Euphrates might symbolize a transition from mundane existence to a realm of mystery or spiritual significance, reflecting a cultural perspective rooted in mythology and cosmology.

These varied interpretations highlight the richness and diversity of religious, philosophical, and cultural frameworks present in ancient texts. The river's crossing serves as a flexible symbol that adapts to different narratives, conveying themes of transition, judgment, liberation, or cosmic transformation based on the unique perspectives of each tradition.
Exploring these interpretative variations allows participants to appreciate the complexity of symbolism within ancient texts and provides insights into how different cultures and belief systems interpreted common motifs like the river Euphrates. It showcases the intricate interplay between religious, philosophical, and cultural elements shaping the symbolism and theological implications embedded in these narratives.
The river Euphrates, a prominent geographic feature in ancient texts, embodies universal themes that transcend specific cultural contexts. Identifying these universal themes helps reveal shared human concepts of transition, boundaries, and transformative events across diverse ancient traditions:

1. Threshold and Transition:

• The Euphrates often symbolizes a boundary between known and unknown territories. Its crossing represents a transition from one state to another, signifying a pivotal moment of change or passage. This theme of crossing a threshold echoes the human experience of transitions in life, moving from familiar to unfamiliar realms.

1. Boundary and Separation:

• As a geographical boundary, the Euphrates signifies separation between distinct territories or civilizations. This concept of demarcation resonates with universal human experiences of setting boundaries, delineating spaces, or marking divisions between different aspects of life.

1. Transformative Events:

• Crossing the Euphrates is often associated with cosmic or transformative events in ancient texts. This universal theme reflects the human fascination with the concept of epochal change, cosmic upheavals, or moments of divine intervention that reshape the course of history.

1. Symbol of Power and Control:

• The river might represent a symbol of power, control, or geopolitical significance. Crossing it could signify shifts in dominance, challenges to established authority, or the assertion of influence. This theme resonates with human narratives of power struggles and shifts in societal dynamics.

1. Metaphor for Spiritual Journeys:

• Across cultures, rivers are often used metaphorically to represent spiritual journeys or quests. The crossing of the Euphrates might symbolize the pursuit of enlightenment, the passage to higher realms of understanding, or the quest for spiritual transformation.

These universal themes associated with the river Euphrates highlight fundamental aspects of the human experience—transitions, boundaries, transformative events, power dynamics, and spiritual journeys. The river's symbolism in ancient texts speaks to shared human aspirations, struggles, and beliefs that transcend cultural boundaries and resonate across different epochs and civilizations.
By identifying and discussing these universal themes, participants gain a deeper appreciation for the profound symbolism embedded in ancient texts and recognize the timeless relevance of concepts such as transition, boundaries, and transformative events in shaping human narratives and aspirations.

1. Historical Context:

• What historical events or societal conditions might have influenced the composition of the War Scroll?
  
• How does the historical context of the Dead Sea Scrolls' discovery contribute to our understanding of this text's significance?
  

1. Symbolism and Esoteric Wisdom:

• How does the War Scroll use symbolism to convey spiritual or cosmic themes?
  
• What esoteric wisdom or deeper spiritual insights can be derived from the portrayal of cosmic conflict and divine intervention within the text?
  

1. Comparative Analysis:

• Compare the themes and symbolism of the War Scroll with other apocalyptic texts from different cultures (e.g., Book of Revelation, The Book of Daniel). What common motifs or differences in interpretation do you observe?

1. Parallelism in Biblical Texts:

• Explore connections between the War Scroll and other biblical texts. How does the language, imagery, or themes in the War Scroll intersect with passages from the Hebrew Bible or New Testament?

1. Community Beliefs and Practices:

• How might the apocalyptic expectations depicted in the War Scroll have influenced the beliefs and practices of the community that produced it?
  
• Discuss the impact of such intense anticipation of cosmic conflict on communal life and religious rituals within the community.
  

1. Cultural Significance of Cosmic Battles:

• Across various ancient cultures, why do you think depictions of cosmic battles and eschatological events were significant? What might these narratives represent in a broader cultural context?

1. Interpretive Variations and Unique Perspectives:

• Explore the diverse interpretations of specific passages or symbols within the War Scroll. How do different scholars or traditions interpret these elements, and what underlying factors might influence their interpretations?

1. Personal Reflection and Modern Relevance:

• Reflect on how the themes of cosmic conflict, righteousness, and spiritual warfare in the War Scroll might resonate in contemporary society or personal belief systems.

1. Theological and Philosophical Implications:

• Discuss the theological and philosophical implications of a cosmic battle between forces of light and darkness. How does this theme intersect with broader philosophical inquiries or theological doctrines?

1. Literary and Symbolic Analysis:

- Analyze the narrative structure and symbolic elements present in specific passages of the War Scroll. How do these elements contribute to the text's overarching themes and meanings? 

These study questions aim to provoke critical thinking, promote in-depth exploration of themes, encourage comparative analysis, and stimulate discussions on the multifaceted nature of the War Scroll's content and its significance within ancient and contemporary contexts.

1. Archaeological and Linguistic Analysis:

- How does the physical condition of the Dead Sea Scrolls, including the War Scroll, impact our understanding of their preservation and historical context? - Discuss the linguistic peculiarities or unique textual features found within the War Scroll and their implications for translation and interpretation. 

1. Apocalyptic Expectations and Messianic Concepts:

- Explore the portrayal of messianic figures or anticipated saviors within the War Scroll. How do these concepts align with or diverge from contemporary expectations of a messianic figure in other ancient texts or religious traditions? 

1. Impact of Apocalyptic Literature:

- Analyze the enduring influence of apocalyptic literature, such as the War Scroll, on subsequent religious, literary, or cultural traditions. How have these texts shaped later beliefs or inspired artistic and literary works? 

1. Ethical and Moral Frameworks:

- Discuss the ethical or moral implications of the cosmic conflict depicted in the War Scroll. How do the themes of righteousness and wickedness contribute to the text's underlying moral framework? 

1. Role of Prophecy and Revelation:

- Explore the role of prophecy and revelation within the War Scroll. How do the prophetic elements contribute to the text's portrayal of future events and cosmic justice? 

1. Experiential and Ritualistic Elements:

- Investigate potential ritualistic or experiential dimensions associated with the teachings or beliefs conveyed in the War Scroll. How might the community have engaged with these teachings in their religious practices or communal activities? 

1. Literary Genre and Interpretation:

- Discuss the classification of the War Scroll within the broader genre of apocalyptic literature. How does its classification influence our understanding and interpretation of its themes and symbolic elements? 

1. Relevance in Modern Scholarship:

- Reflect on the ongoing scholarly debates or discoveries related to the War Scroll. How have modern interpretations evolved, and what implications do these new perspectives have on our understanding of the text? 

1. Intersection of Faith and Scholarship:

- Consider the interplay between faith-based interpretations and scholarly analyses of the War Scroll. How might religious convictions or theological frameworks influence academic research and vice versa? 

1. Future Research and Interpretative Avenues:

- Propose potential avenues for future research or areas of exploration concerning the War Scroll. What unanswered questions or unexplored aspects merit further investigation? 

The composition of the War Scroll, along with other Dead Sea Scrolls, was likely influenced by several historical events and societal conditions prevalent during the time of its writing, which is estimated to be between the 2nd century BCE and the 1st century CE:

1. Hellenistic Rule and Cultural Influence:

• The region where the Dead Sea Scrolls were found was under Hellenistic influence due to the conquests of Alexander the Great and the subsequent control by the Seleucid Empire. This era saw a clash between Hellenistic culture and Jewish traditions, leading to cultural tensions and a desire to preserve religious and cultural heritage.

1. Political Turmoil and Resistance Movements:

• The Jewish people experienced political unrest, particularly during the Maccabean Revolt against Seleucid rule. This period was characterized by resistance movements, attempts to preserve Jewish identity, and fervent anticipation of a messianic figure to deliver them from foreign oppression.

1. Religious Sects and Spiritual Expectations:

• Various religious sects existed within Judaism, each with its own interpretations and expectations of messianic redemption, purity laws, and theological doctrines. The community associated with the Dead Sea Scrolls, often believed to be the Essenes, likely had distinctive theological beliefs and a strong apocalyptic worldview.

1. Anticipation of Cosmic Redemption:

• There was a widespread belief in the imminent arrival of a messianic figure or a divine intervention that would bring about cosmic redemption, ushering in an era of righteousness and divine rule. This anticipation of apocalyptic events and a cosmic battle between forces of light and darkness is reflected in the War Scroll's themes.

Regarding the historical context of the Dead Sea Scrolls' discovery, its significance lies in multiple facets:

1. Preservation of Ancient Texts:

• The discovery of the Dead Sea Scrolls, including the War Scroll, provided an invaluable collection of ancient manuscripts that significantly expanded our understanding of ancient Jewish texts, religious beliefs, and the diversity of Jewish thought during the Second Temple period.

1. Insights into Jewish Sectarianism:

• The scrolls shed light on the diversity of beliefs and practices among Jewish sects during that time. Understanding the beliefs and expectations of the community associated with the Dead Sea Scrolls helps contextualize the theological and apocalyptic themes present in the War Scroll.

1. Confirmation of Scriptural Accuracy:

• The Dead Sea Scrolls' discovery contributed to confirming the accuracy and preservation of certain biblical texts, highlighting the continuity of textual transmission across centuries and supporting the authenticity of biblical manuscripts.

1. Impact on Biblical Studies and Scholarship:

• The discovery of the Dead Sea Scrolls revolutionized biblical studies, providing scholars with invaluable primary sources for studying ancient Judaism, the development of biblical texts, and the context in which these texts were composed.

The historical context of political upheaval, religious expectations, and the preservation of texts within the Dead Sea Scrolls contributes significantly to understanding the milieu in which the War Scroll was written. It provides a backdrop against which the themes of cosmic conflict, eschatological anticipation, and religious fervor within the War Scroll can be comprehended.

Does your child break into a sweat at the sight of a math worksheet? Do homework nights turn into battlegrounds over fractions and equations? If so, you're not alone. Many students struggle with math, but there's hope! Here at Krishna Home Tuition in Mohali, we offer personalized Home Tuition in Mohali that can help your child conquer math concepts and build confidence.
Why Choose Home Tuition in Mohali for Math Help?
Traditional classroom settings can sometimes move too quickly, leaving students confused and falling behind. Home Tuition in Mohali provides a one-on-one learning environment where your child can receive the focused attention they need. Our experienced tutors can identify your child's specific learning gaps and tailor their teaching approach accordingly.
Benefits of Home Tuition in Mohali for Math:

• Personalized Learning: We create a customized learning plan that addresses your child's individual strengths and weaknesses.
• Improved Understanding: Our tutors break down complex concepts into manageable steps, ensuring your child grasps the fundamentals.
• Boosted Confidence: As your child masters math skills, their confidence will grow, leading to a more positive attitude towards learning.
• Convenient and Flexible: We offer scheduling flexibility to fit your family's busy lifestyle.
• Effective Communication: We maintain regular communication with you, keeping you updated on your child's progress.

Krishna Home Tuition: Your Partner in Math Success
At Krishna Home Tuition in Mohali, we are passionate about helping students succeed in math. Our tutors are highly qualified and experienced professionals who are dedicated to making learning fun and engaging. We use a variety of teaching methods, including interactive activities, games, and visual aids, to keep your child motivated and on track.
Don't let math struggles hold your child back. Contact Krishna Home Tuition in Mohali today to learn more about our Home Tuition in Mohali programs and how we can help your child conquer math!