write the number you want to be colored on the sheet / page in msgbox Free Excel Macros (VBA) | Excel Programs

Copy Macro

'For online Excel courses click: https://www.excelsizeyeter.com/excelwithkenan.com/udemy_giris.php 
 
Option Explicit
Option Compare Text
Sub Check_Values_1()
    On Error Resume Next
    Dim CurCell As Range
    Dim Heading As String
    Dim Prompt As String
    Dim Criteria As Variant
    Dim Color As Long
    Dim lRows As Long
    Dim lCols As Long
    Dim lAllCells As Long
    lRows = ActiveSheet.Rows.Count
    lCols = ActiveSheet.Columns.Count
    lAllCells = lRows * lCols
    If Selection.Cells.Count = lAllCells Then
        MsgBox "To check the entire sheet, please select only one cell", 64
        Exit Sub
    End If
    Heading = "Enter Criteria"
    Prompt = "Enter the value you want to find and highlight."
    Color = 3
    Criteria = InputBox(Prompt, Heading)
    If Criteria = "" Then
        Exit Sub
    ElseIf IsNumeric(Criteria) Then
        Criteria = CLng(Criteria)
    ElseIf IsDate(Criteria) Then
        Criteria = CDate(Criteria)
    Else
        Criteria = CStr(Criteria)
    End If
    If Selection.Cells.Count > 1 Then
        For Each CurCell In Selection
            If CurCell.Value = Criteria Then CurCell.Interior.ColorIndex = Color
        Next CurCell
    Else
        For Each CurCell In ActiveSheet.UsedRange
            If CurCell.Value = Criteria Then CurCell.Interior.ColorIndex = Color
        Next CurCell
    End If
End Sub

No	Macro Name
1	write the number you want to be colored on the sheet / page in msgbox
2	excel operators hk
3	Write numbers to a1: a5 and warns c1 if their total is 100
4	Write numbers to a1: a5 and give warnings to c1 if their sum is not 100
5	Print Custom Pages: You can use this code to print a range of custom sheet / pages instead of using the setting from the print options. Suppose you want to print sheet / pages 5 to 10. Just run this VBA code and enter the start sheet / page and end sheet / page.
6	Create a user-defined menu / Create your own menu and assign a macro to them in the "Extensions" section
7	print button Do you want to preview the sheet / page to be printed
8	prints all sheet / pages with data or scans but does not print
9	list the sheet / page by message you just write the number goes to that sheet / page
10	select red number and write to g12
11	writes the names of all sheet / pages from the active sheet / page and cell and adds a link to the sheet / pages
12	specify the number of copies to print from the printer
13	find the textbox in the sheet / page (must write all)
14	collects selected fields in status bar
15	number of sheet / page prints with message box (prints even if the sheet / page is blank)
16	When you click on any cell, it scrolls to the right and writes the numbers of the days in that month and color the weekends.
17	Number / Highlight Cells that Error in the entire worksheet: This code will help you to highlight and count all the cells you have made an error with. Just run this code and it will return a message containing the number error cells and will highlight all the cells.
18	lists the named cells in detail on the wb_names sheet / page
19	write to the cell delete the range of data to be deleted (deletes from sheet / page1 and sheet / page2 on sheet / page1 to a2b2)
20	Hide or show pivot table fields according to a specific criterion

Excel Free Macros (VBA)

Write The Number You Want To Be Colored On The Sheet / Page İn Msgbox

Online Excel Courses

Services

How can we help you?

Subscribe to our Youtube Channel?

Keywords