ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   if - then actions (https://www.excelbanter.com/excel-programming/405865-if-then-actions.html)

N+

if - then actions
 
hi all, i need to make this work..
if condition "true",
then launch an exe file on disk and write 0 (zero) in a B1 cell..
ty if u can help me

N+

if - then actions
 
hmm forgot the notify of replies !

"N+" wrote:

hi all, i need to make this work..
if condition "true",
then launch an exe file on disk and write 0 (zero) in a B1 cell..
ty if u can help me


Mike H

if - then actions
 
Despite having not too much to go on, this may get you going in the right
direction.

Sub ordinate()
If 1 = 1 Then 'set you own condition here
Shell "Notepad.exe"
Range("B1").Value = 0
Else
'and now for something diferent
End If

End Sub


Mike

"N+" wrote:

hi all, i need to make this work..
if condition "true",
then launch an exe file on disk and write 0 (zero) in a B1 cell..
ty if u can help me


Gary''s Student

if - then actions
 
Sub demo()
Dim WhatIsTruth As Boolean
WhatIsTruth = True
If WhatIsTruth Then
x = Shell("cmd.exe /c C:\Userguide.exe", 1)
Range("B1").Value = 0
End If
End Sub
--
Gary''s Student - gsnu200768


"N+" wrote:

hi all, i need to make this work..
if condition "true",
then launch an exe file on disk and write 0 (zero) in a B1 cell..
ty if u can help me


JLGWhiz

if - then actions
 
If myCondition = True Then
ActiveSheet.Range("B1") = "0"
ChDrive "A"
Call myFile.exe
End If

Use string zero so it will display.

"N+" wrote:

hmm forgot the notify of replies !

"N+" wrote:

hi all, i need to make this work..
if condition "true",
then launch an exe file on disk and write 0 (zero) in a B1 cell..
ty if u can help me


N+

if - then actions
 
i can't start it now , thanks for help, i will try both as soon as possible
the condition is a generic ..if A1 = TRUE

so it should sound like this..

Sub demo()
Dim A1 As Boolean
A1 = True
If A1 Then..

...end sub


"Gary''s Student" wrote:

Sub demo()
Dim WhatIsTruth As Boolean
WhatIsTruth = True
If WhatIsTruth Then
x = Shell("cmd.exe /c C:\Userguide.exe", 1)
Range("B1").Value = 0
End If
End Sub
--
Gary''s Student - gsnu200768


"N+" wrote:

hi all, i need to make this work..
if condition "true",
then launch an exe file on disk and write 0 (zero) in a B1 cell..
ty if u can help me



All times are GMT +1. The time now is 09:28 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com