Skip to main content

VBA excel automatic date when value add

 In Microsoft Excel, you can use Visual Basic for Applications (VBA) to automatically enter a date in a cell when a value is added. Here's an example of how you can do this: Press Alt + F11 to open the VBA editor. Right-click the sheet tab where you want to add the date, then select "View Code". In the code editor, paste the following code: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub If Not Intersect(Target, Range("A1:A10")) Is Nothing Then Target.Offset(0, 1).Value = Date End If End Sub Close the code editor by clicking the "X" in the top-right corner. This code will automatically enter the current date in the cell next to the active cell whenever a value is added in the cells from A1 to A10. If you want to change the range of cells, you can modify the range in the line "If Not Intersect(Target, Range("A1:A10")) Is Nothing Then". Note: This code works in all recent versions of Micr...

Excel formula for attendance

There are many ways you can use formulas in Excel to track attendance. Here are a few examples:


  1. Counting the number of present days: To count the number of days a person is marked as present, you can use the COUNTIF function. For example, suppose you have a column for attendance status with "P" for present and "A" for absent. You can use the following formula to count the number of present days:

=COUNTIF(A2:A31, "P")

This formula will count the number of cells in the range A2:A31 that contain the value "P".

  1. Calculating attendance percentage: To calculate the percentage of days a person is marked as present, you can use the following formula:

=(COUNTIF(A2:A31, "P") / (COUNTIF(A2:A31, "P") + COUNTIF(A2:A31, "A"))) * 100

This formula will count the number of "P" values and "A" values in the range A2:A31, and then calculate the percentage of "P" values.

  1. Highlighting absent days: To highlight cells in a range that contain the value "A", you can use the CONDITIONAL FORMATTING feature in Excel. To do this, select the range of cells you want to format, go to the Home tab of the ribbon, and click on the Conditional Formatting button. In the dropdown menu, choose New Rule. In the New Formatting Rule window, select "Format only cells that contain" in the first dropdown, choose "Cell Value" in the second dropdown, and enter "A" in the value field. Then, click the Format button to choose the formatting you want to apply to the cells (such as a red fill color).

These are just a few examples of how you can use formulas in Excel to track attendance. With practice and exploration, you'll be able to find the solution that works best for your needs.

Comments

Popular posts from this blog

Multiple Find and Replace word document using VBA

On the File tab, go to Options > Customize Ribbon. Under Customize the Ribbon and under Main Tabs, select the Developer check box. After you show the tab, the Developer tab stays visible, unless you clear the check box or have to reinstall a Microsoft Office program. The Developer tab is the place to go when you want to do or use the following: 1. Write macros. Sub ReplaceFromTableList() Dim oChanges As Document, oDoc As Document Dim oTable As Table Dim oRng As Range Dim rFindText As Range, rReplacement As Range Dim I As Long Dim sFname As String 'Change the path in the line below to reflect the name and path of the table document sFname = "C:\Users\admin\Documents\FindReplaceTable.docx" Set oDoc = ActiveDocument Set oChanges = Documents.Open(FileName:=sFname, Visible:=False) Set oTable = oChanges.Tables(1) For I = 1 To oTable.Rows.Count Set oRng = oDoc.Range Set rFindText = oTable.Cell(I, 1).Range rFindText.End = rFindText.End - 1 Set r...

VBA excel automatic date when value add

 In Microsoft Excel, you can use Visual Basic for Applications (VBA) to automatically enter a date in a cell when a value is added. Here's an example of how you can do this: Press Alt + F11 to open the VBA editor. Right-click the sheet tab where you want to add the date, then select "View Code". In the code editor, paste the following code: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub If Not Intersect(Target, Range("A1:A10")) Is Nothing Then Target.Offset(0, 1).Value = Date End If End Sub Close the code editor by clicking the "X" in the top-right corner. This code will automatically enter the current date in the cell next to the active cell whenever a value is added in the cells from A1 to A10. If you want to change the range of cells, you can modify the range in the line "If Not Intersect(Target, Range("A1:A10")) Is Nothing Then". Note: This code works in all recent versions of Micr...

Snake game using Javascript

Here is an example of a basic snake game using JavaScript: // canvas setup var canvas = document.getElementById("snake-game"); var ctx = canvas.getContext("2d"); // game variables var snake = [{x: 150, y: 150}]; var direction = "right"; var foodX = Math.floor(Math.random() * canvas.width); var foodY = Math.floor(Math.random() * canvas.height); var score = 0; // game loop setInterval(function() {   // clear the canvas   ctx.clearRect(0, 0, canvas.width, canvas.height);   // draw food   ctx.fillStyle = "red";   ctx.fillRect(foodX, foodY, 10, 10);   // move snake   var head = {x: snake[0].x, y: snake[0].y};   if (direction === "right") {     head.x += 10;   } else if (direction === "left") {     head.x -= 10;   } else if (direction === "up") {     head.y -= 10;   } else if (direction === "down") {     head.y += 10;   }   snake.unshift(head);   // check for collision with food ...