'내역관련/함수' 카테고리의 글 목록

셀수식이 나누어진 수량산출서 검토 방안

사용자정의 함수(scal) 및 문자열 수식 계산작업순서1. 추가기능 건설공무를 위한 ExcelToolBox 설치 후2. 사용자정의 함수 scal( )는 추가기능(ExcelToolBox)이 설치 되어야 사용 할 수 있습니다.3. 문자열 계산의 사용 예ABCDEF1외벽단열마감마감termious.tistory.com 엑셀 CONCATENATE, 엑셀 CONCAT, 엑셀 TEXTJOIN 함수 강의(엑셀함수강의-47)엑셀에는 여러 개의 텍스트를 연결해서 하나의 텍스트를 만드는 3개의 함수와 1개의 연산자가 있습니다. 먼...blog.naver.com

내역관련/함수 2024.06.20

열 문자를 숫자로 변환

Sub VBA_Column_Letter_To_Number_Example() On Error Resume Next Dim MyColumn As String Dim Here As String 'Variable declaration Dim sColName As String '현재 선택셀의 열주소를 반환 Here = Selection.Address MyColumn = Mid(Here, InStr(Here, "$") + 1, InStr(2, Here, "$") - 2) 'Assign value to a variable sColName = MyColumn 'Call Function MsgBox "Column Number for Column Letter " & sColName & " is :" _ & VBA_Colu..

내역관련/함수 2024.01.14

열 번호를 문자로 변환

Function Col_Letter(lngCol As Long) As String Dim vArr vArr = Split(Cells(1, lngCol).Address(True, False), "$") Col_Letter = vArr(0) End Function 열 번호를 문자로 변환하는 기능? qastack.kr

내역관련/함수 2024.01.14

수식에서 TRUNC() 함수를 INT()함수로 변경

Option Explicit Sub 함수변경() 'TRUNC함수를 INT함수로 변경하는 매크로 '", 0)"을 ",0)로 빈 공간을 바꾸고 시작하세요. On Error GoTo err_bar Dim rngA As Range Dim S_CELL As Object Dim intLen As Integer Dim strChr As String Dim f_str As String Dim b_str As String Dim i As Integer Set rngA = Selection For Each S_CELL In rngA strChr = S_CELL.Formula i = Len(strChr) If i > 5 Then f_str = Mid(strChr, 1, 6) b_str = Mid(strChr, i - 2, ..

내역관련/함수 2023.07.22

사용자정의 함수(hap), sumif 대체

=hap(sum_range,font_color_criteria) 인수 설명 sum_range (필수요소) 합계를 구할 셀 범위 font_color_criteria (필수요소) 적색 “R”, 검정색 “B” Ex1. hap(a1:a10,“R”) : 셀범위에 적색에 해당하는 셀을 더함 Ex2. hap(a2:a11,“B”) : 셀범위에 검정색에 해당하는 셀을 더함 =hapif(sum_range,font_color_criteria,offset_column,criteria) 인수 설명 sum_range (필수요소) 합계를 구할 셀 범위 font_color_criteria (필수요소) 적색 “R”, 검정색 “B” offset_column (필수요소) 참조열 criteria (필수요소) 어떤 셀을 더할지 지정하는 조건..

내역관련/함수 2022.10.18

수식에 함수(INT) 추가

Sub 수식수정() on Error Resume Next Dim sTrwhat As String Dim sTemp As String Dim sResult As Variant Dim i As Integer Dim j As Integer For j = 21 To 54 Step 1 sTrwhat = Cells(j, 5).Formula If Not IsNumeric(sTrwhat) Then For i = 2 To Len(sTrwhat) sTemp = Mid(sTrwhat, i, 1) sResult = sResult & sTemp Next i Cells(j, 5).Formula = "=INT(" & sResult & ")" sResult = "" End If Next j End Sub

내역관련/함수 2022.10.10

현재셀의 열주소 반환

Sub Convert_Column() Dim MyColumn As String, Here As String ' Get the address of the active cell in the current selection Here = ActiveCell.Address MsgBox Here ' Because .Address is $$, drop the first ' character and the characters after the column letter(s). MyColumn = Mid(Here, InStr(Here, "$") + 1, InStr(2, Here, "$") - 2) ' Show the answer. MsgBox MyColumn End Sub

내역관련/함수 2022.10.10

NUMBERSTRING의 활용 (숫자를 문자로 변환)

도급액 : 일금 사십육억사천육백칠십삼만팔천육백원정(₩4,646,738,600) =": 일금 " & NUMBERSTRING(내역서!F37,1) & "원정" & TEXT(내역서!F37,"(\#,###)") - 함수정의 = NUMBERSTRING(range, type) · range : 숫자 값, 숫자가 포함된 셀의 참조 · type : 숫자를 문자로 변환할 유형 1 : 한글(일십이만삼천사백오십육) 2 : 한자(壹拾貳萬參阡四百伍拾六) 3 : 한글로 일련번호 표시 - 사용함수 · NUMBERSTRING(), TEXT()

내역관련/함수 2022.10.10

vlookup의 활용(Ⅴ), 건축수량집계표

1. 샘플 건축수량집계.xls 2. 참고 문자열 수식계산 함수 : https://termious.tistory.com/26 3. 건축수량집계표 수량산출근거에서 지정된 수량코드를 'sumif()'함수를 이용하여 집계를 구한다. 4.수량산출근거 vlookup()함수를 사용하여 수량산출집계표의 수량코드를 산출근거에 뿌려준다.

내역관련/함수 2022.10.08