I keep getting a send error report when trying to delete some worksheets using the function or macros below:
Public Sub delete_worksheet()
Dim shtDelWorkSheet As Worksheet
For Each shtDelWorkSheet In Application.Worksheets
Select Case shtDelWorkSheet.Name...
Excel seems to crash when I try to delete worksheets. The procedure seems to be working in previous release of my tool.
Public Sub delete_worksheet()
Dim shtDelWorkSheet, mySheets
mySheets = Array("A", "B", "C" "D", "E")
For Each...
Good Afternoon - I have a worksheet and I will like to autosize all the cells with comments. The code below works if the used range all have comments.
ActiveCell.Comment.Shape.TextFrame.AutoSize = True
Good Afternoon - I have a workbook with about 30 worksheets. Each worksheets have numerous comments in it. When I created the comments boxes that sized to specific width and lenght based on the text contents. But, for some reason the comments boxes seems to have a mind of their own and shrink or...
Good Morning - I have a worksheet in excel with about 20 checkboxes and I will like to set the value of each checkboxes on the click of a button without having to spell out the name of each checkboxes. Is this possible. I know in Visual Basic I can create an array of checkboxes. But I don't know...
Good Morning - I created a form userform in excel with about 20 checkboxes and I will like to set the value of each checkboxes on the click of a button without having to spell out the name of each checkboxes. Is this possible. I know in Visual Basic I can create an array of checkboxes. But I...
I'm trying to print 0 and 1 in a range of cell but I can't get it work: I keep getting all 0 values
Dim myRange As Range, i As Integer, b As Integer
ActiveSheet.Range("A1:a10").Select
i = 1
For Each myRange In Selection.Cells
b = i - 1
myRange.Value = b...
The use of the controlsource property of the text box generates a run-time error 380:
could not set the controlsource property. Invalid property value.
'this line of code was put in the initialize section of form module.
frm1.txtCICM.ControlSource = Sheets("VAR").Range("L4").Text
Thanks...the function runs by itself as a procedure but when I make it a function and call it in the layout_input_sheet it runs into an infinite loop. What an trying to do is select a range. For example A1:a10 and look for some values and insert rows above the values. Thanks.
Good Morning - I have some problem with this function, it's running into an infinite loop. All I want is to insert rows based an a number. For example if:
frmSAGE.txtConsolePorts.Text = 5. Insert 5 rows
rngRefName = "EndNumCSLconsolports"
Public Sub layout_input_sheet()
Dim rngRefName...
Good Afternoon - I have a workbook with 20 worksheets and will like to re-name the worksheets with the values in a range i.e A1:A20 with the click of a command button. How do I do this?
Code example:
dim ws as worksheet, rng as range
sheets("Sheet1").select...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.