Check Whether The Active Cell İs Numeric Or Text Online Excel and Excel Macro (VBA) Courses Copy Macro 'For online Excel courses click: https://www.excelsizeyeter.com/excelwithkenan.com/udemy_giris.php Sub numeric_control() If Not Application.IsNumber(ActiveCell) Then MsgBox "Numerik değil" Else MsgBox "Numerik" End If End Sub Sub text_control() If Not Application.IsText(ActiveCell) Then MsgBox "Yazı değil" Else MsgBox "Yazı" End If End Sub Report problem with this macro This macro does not work. There's an error in the code. Other You can write your comments about the error in the box below. Report error ALL MACROS Youtube Channel The following macros may be useful for you. Similar Results NoMacro Name 1 check whether the active cell is numeric or text 2 write the number you want to be colored on the sheet / page in msgbox 3 search color 4 excel operators hk 5 Highlight Cells with Wrong Words: This code is for you if it becomes difficult to check all cells due to typos. It controls each cell in the selection and highlights the cell with a misspelled word. 6 Remove Characters from a Directory: Remove only characters from the beginning of a text string. All you need is to reference a cell or add a number of characters and text to the function to remove from the text string. There are two arguments,rng" for the text string andcnt" for the number of characters to remove. for example: 1 incnt if you want to remove the first characters from a cell; 7 delete duplicate / duplicate rows 8 write the same cell in all cells on the active sheet / page 9 finding the type of active cell 10 Calculate the sum of cells with only a certain cell color 11 check the same data on the active sheet / page 12 Find how many formulas are in the selected field and select all cells containing the formula 13 Does the active cell remain in an area named after it? 14 adding two lines and removing total 15 Highlight All Cells in a Worksheet with an Empty but Not Visible Field: Some cells are sometimes empty, but have a single field. And so it is really hard to identify them. This code checks all the cells in the worksheet and will highlight all the cells with a single field. 16 Determining whether the cell contains a numeric value 17 inserts months as sheet / pages Specifies days in detail 18 Inputbox add year as summer 19 Turkish alphabetical sorting also sorts hidden sheet / pages 20 specify the number of copies to print from the printer