hi
please try this code.
Sub textb_ed()
Dim s, e As Integer
Dim rng As Range
Set rng = Application.InputBox("Select a Rang", Type:=8)
On Error GoTo ErrorHandler
s = InputBox("Enter the starting tb no")
e = InputBox("Enter the ending tb no")
For j = s To e
a = "TextBox " & j
ActiveSheet.Shapes(
-
>
> From: Mr_Bill
>To: excel-macros@googlegroups.com
>Sent: Wednesday, September 24, 2014 1:48 PM
>Subject: $$Excel-Macros$$ VBA Numbers only in Textbox
>
>
>
>Can this code be adapted to work with only certain text
In that case you will need to as many copy of codes
+
*I did not do this for you. God is here working through me for you.*
On Thu, Sep 25, 2014 at 11:29 AM, Mr_Bill wrote:
>
> It requires a bit more than that. I change TextBox1 to wtBox1 now what
> about wtBox2,wtBox3,wtBox4,wtBox5 as I s
It requires a bit more than that. I change TextBox1 to wtBox1 now what
about wtBox2,wtBox3,wtBox4,wtBox5 as I said there are 15 not just one.
Suppose too much work for a freebie thank you anyways.
On Wednesday, September 24, 2014 10:31:21 PM UTC-7, Vabz wrote:
>
> hi
>
> You need to change TextB
hi
You need to change TextBox1 to text box you desired.
Cheers!!
+
*I did not do this for you. God is here working through me for you.*
On Wed, Sep 24, 2014 at 11:18 PM, Mr_Bill wrote:
> Can this code be adapted to work with only certain textboxs? I have 15
> boxes in a form that require
Can this code be adapted to work with only certain textboxs? I have 15
boxes in a form that require a number to be input and all are named wtBox1
- wtBox15
Dim LastPosition As Long
>
> Private Sub TextBox1_Change()
> Static LastText As String
> Static SecondTime As Boolean
> If Not Secon
