Private Sub Command1_Click()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim rsCount As Integer
Dim queryNameOrSQL As String
queryNameOrSQL = "select * from excel"
Set db = CurrentDb
Set rs = db.OpenRecordset(queryNameOrSQL)
rs.MoveLast
rsCount = rs.recordCount
Text1.Value = rsCount
End Sub
* excel : 테이블 이름(table name)
2015년 1월 26일 월요일
2015년 1월 19일 월요일
[엑셀VBA]마지막행 구하기
Lastrow = Sheet1.Range("A65536").End(xlUp).Row + 1
Sub LastRowInOneColumn()
'Find the last used row in a Column: column A in this example
Dim LastRow As Long
With ActiveSheet
LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
End With
MsgBox LastRow
End Sub
Sub LastColumnInOneRow()
'Find the last used column in a Row: row 1 in this example
Dim LastCol As Integer
With ActiveSheet
LastCol = .Cells(1, .Columns.Count).End(xlToLeft).Column
End With
MsgBox LastCol
End Sub
Sub LastRowInOneColumn()
'Find the last used row in a Column: column A in this example
Dim LastRow As Long
With ActiveSheet
LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
End With
MsgBox LastRow
End Sub
Sub LastColumnInOneRow()
'Find the last used column in a Row: row 1 in this example
Dim LastCol As Integer
With ActiveSheet
LastCol = .Cells(1, .Columns.Count).End(xlToLeft).Column
End With
MsgBox LastCol
End Sub
2015년 1월 15일 목요일
[MSSQL]레코드 생성일자 추가
"레코드생성일자" DATETIME NOT NULL DEFAULT 'getdate()',
ALTER TABLE stock ADD CONSTRAINT DF_YourTable DEFAULT GETDATE() FOR YourColumn
ALTER TABLE dbo.MyTable ADD CONSTRAINT my_Con DEFAULT GETDATE() for created UPDATE MyTable SET Created = GetDate() where Created IS NULL ALTER TABLE dbo.MyTable ALTER COLUMN Created DATETIME NOT NULL
"레코드수정일자" DATETIME NOT NULL DEFAULT '' ON UPDATE CURRENT_TIMESTAMP,
ALTER TABLE stock ADD "레코드생성일자2" DATETIME NOT NULL DEFAULT 'GETDATE()';
ALTER TABLE stock ADD "레코드생성일자2" DATETIME NOT NULL DEFAULT 'GETDATE()';
2015년 1월 10일 토요일
[번외:해외직구스마트폰]How To Buy
주의사항
1. 언락여부
2. 국내 주파수 지원
3. 한국어 지원 여부
국내 이통사 4G LTE 주파수 할당
- SKT: Band3 (1800MHz), Band5 (850MHz)
- KT: Band3 (1800MHz), Band8 (900MHz)
- LGU+: Band1 (2100MHz), Band5 (850MHz), Band7 (2600MHz)
Network: 4G: FDD-LTE 800/900/1800/2100/2600 MHz
해외쇼핑몰 검색어 : unlocked smartphone lte [사용하는 이통사 주파수] <--- KT면 900, 1800
1. 언락여부
2. 국내 주파수 지원
3. 한국어 지원 여부
국내 이통사 4G LTE 주파수 할당
- SKT: Band3 (1800MHz), Band5 (850MHz)
- KT: Band3 (1800MHz), Band8 (900MHz)
- LGU+: Band1 (2100MHz), Band5 (850MHz), Band7 (2600MHz)
Network: 4G: FDD-LTE 800/900/1800/2100/2600 MHz
해외쇼핑몰 검색어 : unlocked smartphone lte [사용하는 이통사 주파수] <--- KT면 900, 1800
2015년 1월 6일 화요일
피드 구독하기:
글 (Atom)