Click here to Skip to main content
15,908,013 members
Home / Discussions / Visual Basic
   

Visual Basic

 
GeneralRe: MIDI and USB Keyboard! Pin
User 989707411-Dec-17 9:41
User 989707411-Dec-17 9:41 
GeneralRe: MIDI and USB Keyboard! Pin
User 989707412-Nov-17 8:30
User 989707412-Nov-17 8:30 
AnswerRe: MIDI and USB Keyboard! Pin
Jaroslav Mitrovic28-Dec-17 16:39
Jaroslav Mitrovic28-Dec-17 16:39 
QuestionLinq GroupBy Name using some sort of logic of names in common Pin
jkirkerx9-Nov-17 9:08
professionaljkirkerx9-Nov-17 9:08 
AnswerRe: Linq GroupBy Name using some sort of logic of names in common Pin
Mycroft Holmes9-Nov-17 13:16
professionalMycroft Holmes9-Nov-17 13:16 
GeneralRe: Linq GroupBy Name using some sort of logic of names in common Pin
jkirkerx10-Nov-17 6:22
professionaljkirkerx10-Nov-17 6:22 
GeneralRe: Linq GroupBy Name using some sort of logic of names in common Pin
Mycroft Holmes10-Nov-17 13:14
professionalMycroft Holmes10-Nov-17 13:14 
Questionerror 9 Pin
Member 135117618-Nov-17 22:04
Member 135117618-Nov-17 22:04 
not able find error

addn:
If h = 1 Then lr = Range("GTB").Rows.Count + 9
If h = 2 Then lr = Range("NGTB").Rows.Count + 9
Set Gcell = wb.Sheets(InputSheet).Cells.Find(GetVal(CStr(Area(x, j))))
GCA = Gcell.Address(ReferenceStyle:=xlA1, _
                RowAbsolute:=False, ColumnAbsolute:=False)
Range("B" & lr).Value = i
Range("C" & lr).Value = "01-" + headers(1, j) + "-" + Year
'Range("D" & lr).Value = i
Range("G" & lr).Value = Area(x, 15)
Range("H" & lr).Value = Area(x, 16)
Range("I" & lr).Value = Area(x, 14)
Range("E" & lr).Value = Area(x, 17)
Range("J" & lr).Value = Now()

wb.Sheets(InputSheet).Range(GCA).Copy Range("D" & lr)
Range("D" & lr).Font.Size = 9
Range("D" & lr).Font.Name = "Calibri"
End If
nxtc:
Next j
Next x
Erase Area, headers
nw:
Next i
Next h
Del Worksheets("GTB AUDIT"), "GTB", wb
Del Worksheets("NOT GTB AUDIT"), "NGTB", wb
Ordering
FormatGTB Sects
FormatNGTB Sects
wb.Close False
Application.ScreenUpdating = True
'ActiveCell.MergeArea.Rows.Count
End Sub

AnswerRe: error 9 Pin
Member 135117618-Nov-17 22:05
Member 135117618-Nov-17 22:05 
GeneralRe: error 9 Pin
Member 135117618-Nov-17 22:05
Member 135117618-Nov-17 22:05 
SuggestionRe: error 9 Pin
Jochen Arndt8-Nov-17 23:41
professionalJochen Arndt8-Nov-17 23:41 
QuestionToo many arguments Pin
carlosdas17-Nov-17 14:09
carlosdas17-Nov-17 14:09 
AnswerRe: Too many arguments Pin
Kenneth Haugland7-Nov-17 14:15
mvaKenneth Haugland7-Nov-17 14:15 
QuestionVS2015 data source connection wizard error Pin
Member 1314374431-Oct-17 11:29
Member 1314374431-Oct-17 11:29 
AnswerRe: VS2015 data source connection wizard error Pin
Dave Kreskowiak3-Nov-17 12:36
mveDave Kreskowiak3-Nov-17 12:36 
QuestionEMAIL ARCHIVE Pin
Member 1277093031-Oct-17 4:58
Member 1277093031-Oct-17 4:58 
AnswerRe: EMAIL ARCHIVE Pin
OriginalGriff31-Oct-17 4:58
mveOriginalGriff31-Oct-17 4:58 
AnswerRe: EMAIL ARCHIVE Pin
Maciej Los31-Oct-17 10:24
mveMaciej Los31-Oct-17 10:24 
QuestionVb.net Pin
Member 1312553228-Oct-17 2:18
Member 1312553228-Oct-17 2:18 
AnswerRe: Vb.net Pin
Eddy Vluggen28-Oct-17 4:29
professionalEddy Vluggen28-Oct-17 4:29 
AnswerRe: Vb.net Pin
Dave Kreskowiak28-Oct-17 4:32
mveDave Kreskowiak28-Oct-17 4:32 
QuestionOnPaintBackground and transparency Pin
Harpee27-Oct-17 22:24
Harpee27-Oct-17 22:24 
AnswerRe: OnPaintBackground and transparency Pin
Dave Kreskowiak28-Oct-17 4:16
mveDave Kreskowiak28-Oct-17 4:16 
QuestionUse a custom cursor from a filr Pin
Asanka Akash Sovis26-Oct-17 22:46
professionalAsanka Akash Sovis26-Oct-17 22:46 
AnswerRe: Use a custom cursor from a filr Pin
Richard MacCutchan26-Oct-17 23:18
mveRichard MacCutchan26-Oct-17 23:18 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.