Advertisement
Guest User

Script (" Local ")

a guest
Mar 31st, 2017
195
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.  
  2. Private Sub vbaTxt_Initialize
  3.  
  4. ActiveCells.Select = Value
  5. ActiveCells.Select = vbaUserForm.Value
  6. Daw.Select = (Choose) = UserForm
  7. else
  8. Daw.Select = (Choose) = vbaUserForm
  9. End Daw
  10. ActiveCells.VbaUserForm.Value
  11.  
  12. Mod.ActiveCells = 0
  13.  
  14. Mod.ActiveCells = 1
  15.  
  16. Mod.ActiveCells = 2
  17.  
  18. Mod.ActiveCells = 3
  19.  
  20. Mod.ActiveCells = 4
  21.  
  22. Mod.ActiveCells = 5
  23.  
  24. Mod.ActiveCells = 6
  25.  
  26. Mod.ActiveCells = 7
  27.  
  28. Mod.ActiveCells = 8
  29.  
  30. Mod.ActiveCells = 9
  31.  
  32. Mod.ActiveCells = 10
  33.  
  34. Mod.ActiveCells = 11
  35.  
  36. Mod.ActiveCells = 12
  37.  
  38. Mod.ActiveCells = 13
  39.  
  40. Mod.ActiveCells = 14
  41.  
  42. Mod.ActiveCells = 15
  43.  
  44. Mod.ActiveCells = 16
  45.  
  46. Mod.ActiveCells = 17
  47.  
  48. Mod.ActiveCells = 18
  49.  
  50. Mod.ActiveCells = 19
  51.  
  52. Mod.ActiveCells = 20
  53.  
  54. Mod.ActiveCells = 21
  55.  
  56. Mod.ActiveCells = 22
  57.  
  58. Mod.ActiveCells = 23
  59.  
  60. Mod.ActiveCells = 24
  61.  
  62. Mod.ActiveCells = 25
  63.  
  64. Mod.ActiveCells = 26
  65.  
  66. Mod.ActiveCells = 28
  67.  
  68. Mod.ActiveCells = 29
  69.  
  70. Mod.ActiveCells = 30
  71.  
  72. Local environment.tratch = fault.reved
  73. Check word.count = true
  74. Gerble = 0.1r
  75. Gerble = 1x
  76. Fold = Private Sub Gerble_Initialize
  77. Macro = false reaction
  78.  
  79. Circut.Round = LEN
  80.  
  81. Circut.Straight = LEN
  82.  
  83. Cicrut.Use = RANGE
  84.  
  85. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement