Posts by aadarsh

Re: form trail!!

Hi

If it is your code, could you attach, can have a look

Other reasons could be
It could be either your RAM or Video memory is low

Aadarsh

Re: text in a popup box when going over cell (not comments)

Hi Couple of more questions..

1. What was the shape you initially created
2. Have attached a workbook. The box works fine while appearing, but does not disappear on click

NB: By the way if you make any changes on the workbook can you tell me what the changes are, because i am doing the entire generation of the workbok by code

Aadarsh

Re: text in a popup box when going over cell (not comments)

Thanks

Didnt know the fact about the 255 characters

Aadarsh

Hi

Why do shapes take only 6 lines of text when entering through code. Beyond 6 lines gives a blank shape, whatever the size of the shape.

Is there anyway of getting around this

Aadarsh

Re: text in a popup box when going over cell (not comments)

---
(sorry, refer to above post)

Re: Passing and Saving a Variable

Hi

Sorry forgot to message i did exactly that a little while ago when i ran out of other ideas

Aadarsh

Re: text in a popup box when going over cell (not comments)

-----

Hi

A couple of questions

1. I am running a code from say workbook1 and during the process create Workbook2. Now how do i create and store a variable which is in workbook1 into workbook2.
2. I want the variable to be stored in the file so whenever i open the file i can extract values from the variable.

If you need any more info, please post back
Aadarsh

Re: text in a popup box when going over cell (not comments)

Hi

Thanxs for the code

Sorry for continuously editing and leaving my next 2 posts blank..They had stuff but edited away

Last and final thing...
The textbox seems to allow only 6 lines of text through code, however big it is. Any idea how i can increase it

Thanx
Aadarsh

Re: Seperate data into different worksheet

the reason i gave that code was cos u said wanted to move..

Aadarsh

Re: text in a popup box when going over cell

bump

Re: Rounding Up

Here is the code..I hope this is what u want

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)


Label1.Caption = Round(Int(3 * 71) / 100, 0) * 100


End Sub

Re: Seperate data into different worksheet

Sorry i had made a small mistake

heres the code

i=2 
count=2 
Do While Sheet1.Cells(i,1)<>"" 
    Sheet1.Rows(i).Cut 
    Sheet2.Select 
    Sheet2.Cells(count,1).Select
    Sheet2.Paste 
    Sheet1.Select 
    Sheet1.Rows(i+1).Cut 
    Sheet3.Select 
    Sheet3.Cells(count,1).Select
Sheet3.Paste 
    Sheet1.Select 
    Sheet1.Rows(i+2).Cut 
    Sheet4.Select 
    Sheet4.Cells(count,1).Select
Sheet4.Paste 
    Sheet1.Select 
    Sheet1.Rows(i+3).Cut 
    Sheet5.Select 
    Sheet5.Cells(count,1).Select
Sheet5.Paste 
    Sheet1.Select 
    Sheet1.Rows(i+4).Cut 
    Sheet6.Select 
    Sheet6.Cells(count,1).Select
Sheet6.Paste 
    Sheet1.Select 
    Sheet1.Rows(i+5).Cut 
    Sheet7.Select 
    Sheet7.Cells(count,1).Select
Sheet7.Paste 
    Sheet1.Select 
     
    i=i+6 
    count=count+1 
Loop

Re: Seperate data into different worksheet

Use the following code
Make sure all data is n first sheet and u have 6 otehr sheets to take in data

i=2
count=2
Do While Sheet1.Cells(i,1)<>""
    Sheet1.Rows(i).Cut
    Sheet2.Select
    Sheet2.Cells(count,1).Paste
    Sheet1.Select 
    Sheet1.Rows(i+1).Cut
    Sheet3.Select
    Sheet3.Cells(count,1).Paste
    Sheet1.Select 
    Sheet1.Rows(i+2).Cut
    Sheet4.Select
    Sheet4.Cells(count,1).Paste
    Sheet1.Select 
    Sheet1.Rows(i+3).Cut
    Sheet5.Select
    Sheet5.Cells(count,1).Paste
    Sheet1.Select 
    Sheet1.Rows(i+4).Cut
    Sheet6.Select
    Sheet6.Cells(count,1).Paste
    Sheet1.Select 
    Sheet1.Rows(i+5).Cut
    Sheet7.Select
    Sheet7.Cells(count,1).Paste
    Sheet1.Select 


i=i+6
count=count+1
Loop

Re: text in a popup box when going over cell

Hi

Sorry for replying late.
The stuff to be put into boxes is stored in a n array. One entry for every line.

Now what macro do i write, cos i was always under the impression i have to write one macro for each..Also is thr a way for the box to disappear

Thanx

Aadarsh

Re: Keep a certain row if above row contains a specific number

Hi

Assume the column is A

i=2
With ActiveSheet
Do while .Cells(i,1)<>""
If .Cells(i-1,1)<>-71 Then
.Rows("i:i").Delete Shift:=xlUp
Else
i=i+1
End If
Loop
End with

Re: Automatically selecting/unselecting check boxes

Try using the Checkbox_Change property

Within the sub, give Say Checkbox8.Value=Checkbox1.Value
and so on and so forth based on your table..

For a more detailed code, attach your workbook

Aadarsh

Re: Determine if network security is preventing access

Hi

Is there any way similar to getattr to just check computer on network may not be knoiwing a folder inside...but if access is thr just to computer

Aadarsh

Re: text in a popup box when going over cell

bump

Re: text in a popup box when going over cell

Hi

But i will have to the create 60,000 macros and 60,000 double click events
Or am i missing something here??

Aadarsh